diff lisp/mail/sendmail.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).

--- a/lisp/mail/sendmail.el	Fri Aug 28 04:12:49 2009 +0000
+++ b/lisp/mail/sendmail.el	Fri Aug 28 04:21:14 2009 +0000
@@ -931,7 +931,7 @@
 ;;;###autoload
 (defvar sendmail-coding-system nil
   "*Coding system for encoding the outgoing mail.
-This has higher priority than `default-buffer-file-coding-system'
+This has higher priority than the default `buffer-file-coding-system'
 and `default-sendmail-coding-system',
 but lower priority than the local value of `buffer-file-coding-system'.
 See also the function `select-message-coding-system'.")
@@ -1509,7 +1509,7 @@
 	    (insert-buffer original)
 	    ;; If they yank the original text, the encoding of the
 	    ;; original message is a better default than
-	    ;; default-buffer-file-coding-system.
+	    ;; the default buffer-file-coding-system.
 	    (and (coding-system-equal
 		  (default-value 'buffer-file-coding-system)
 		  buffer-file-coding-system)
@@ -1855,7 +1855,7 @@
 	      ;; TRT, or the user will get prompted for the right
 	      ;; encoding when they send the message.
 	      (setq buffer-file-coding-system
-		    default-buffer-file-coding-system))))))))
+		    (default-value 'buffer-file-coding-system)))))))))
 
 (declare-function dired-move-to-filename "dired" (&optional raise-error eol))
 (declare-function dired-get-filename "dired" (&optional localp no-error-if-not-filep))