Mercurial > emacs
diff lisp/international/mule-diag.el @ 104664:50fdf250e26b
* mh-e/mh-comp.el (mh-send-letter):
* mail/sendmail.el (mail-recover-1):
* international/mule-diag.el (describe-current-coding-system-briefly)
(describe-current-coding-system):
* international/mule-cmds.el (select-safe-coding-system)
(select-message-coding-system)
(set-language-environment-coding-systems, set-locale-environment):
* hexl.el (hexl-insert-multibyte-char):
* dos-w32.el (find-buffer-file-type-coding-system):
* simple.el (what-cursor-position):
Replace uses of default-buffer-file-coding-system
with (default-value 'buffer-file-coding-system).
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 28 Aug 2009 04:21:14 +0000 |
parents | 2e0765155e47 |
children | 68150c643e2e |
line wrap: on
line diff
--- a/lisp/international/mule-diag.el Fri Aug 28 04:12:49 2009 +0000 +++ b/lisp/international/mule-diag.el Fri Aug 28 04:21:14 2009 +0000 @@ -516,8 +516,8 @@ eol-type of `process-coding-system' for read (of the current buffer, if any) `process-coding-system' for write (of the current buffer, if any) eol-type of `process-coding-system' for write (of the current buffer, if any) - `default-buffer-file-coding-system' - eol-type of `default-buffer-file-coding-system' + default `buffer-file-coding-system' + eol-type of default `buffer-file-coding-system' `default-process-coding-system' for read eol-type of `default-process-coding-system' for read `default-process-coding-system' for write @@ -537,8 +537,9 @@ (coding-system-eol-type-mnemonic (car process-coding-systems)) (coding-system-mnemonic (cdr process-coding-systems)) (coding-system-eol-type-mnemonic (cdr process-coding-systems)) - (coding-system-mnemonic default-buffer-file-coding-system) - (coding-system-eol-type-mnemonic default-buffer-file-coding-system) + (coding-system-mnemonic (default-value 'buffer-file-coding-system)) + (coding-system-eol-type-mnemonic + (default-value 'buffer-file-coding-system)) (coding-system-mnemonic (car default-process-coding-system)) (coding-system-eol-type-mnemonic (car default-process-coding-system)) (coding-system-mnemonic (cdr default-process-coding-system)) @@ -592,7 +593,7 @@ (print-coding-system-briefly buffer-file-coding-system) (princ "Not set locally, use the default.\n")) (princ "Default coding system (for new files):\n ") - (print-coding-system-briefly default-buffer-file-coding-system) + (print-coding-system-briefly (default-value 'buffer-file-coding-system)) (princ "Coding system for keyboard input:\n ") (print-coding-system-briefly (keyboard-coding-system)) (princ "Coding system for terminal output:\n ")