From: Karl Heuer <kwzh@gnu.org>
Date: Sun, 19 Oct 1997 20:20:15 +0000 (+0000)
Subject: (basic-save-buffer): Set buffer-file-coding-system to
X-Git-Tag: emacs-20.3~2980
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d6e8ea6f54806a0e94f637d6ca037c96a4ec4580;p=emacs.git

(basic-save-buffer): Set buffer-file-coding-system to
the coding system actually used for saving.
---

diff --git a/lisp/files.el b/lisp/files.el
index 102f0d3ba4f..ad4e7708ebf 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2181,6 +2181,10 @@ After saving the buffer, run `after-save-hook'."
 		;; If a hook returned t, file is already "written".
 		;; Otherwise, write it the usual way now.
 		(setq setmodes (basic-save-buffer-1)))
+	    ;; Now we have saved the current buffer.  Let's make sure
+	    ;; that buffer-file-coding-system is fixed to what
+	    ;; actually used for saving by binding it locally.
+	    (setq buffer-file-coding-system last-coding-system-used)
 	    (setq buffer-file-number
 		  (nthcdr 10 (file-attributes buffer-file-name)))
 	    (if setmodes