From 47d14b48b3b0c9a0f7239fd1dc4fb74d9aef8329 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 30 Dec 2004 23:56:23 +0000 Subject: (revert-buffer): Change explicit-buffer-file-coding-system to buffer-file-coding-system-explicit. (basic-save-buffer-1): Likewise. --- lisp/files.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/files.el') diff --git a/lisp/files.el b/lisp/files.el index 602a79e2f0b..4853e46095d 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -3239,7 +3239,7 @@ Before and after saving the buffer, this function runs (let ((coding-system-for-write save-buffer-coding-system)) (basic-save-buffer-2)) (basic-save-buffer-2)) - (setq explicit-buffer-file-coding-system last-coding-system-used)) + (setq buffer-file-coding-system-explicit last-coding-system-used)) ;; This returns a value (MODES . BACKUPNAME), like backup-buffer. (defun basic-save-buffer-2 () @@ -3713,7 +3713,7 @@ non-nil, it is called instead of rereading visited file contents." ;; internal coding. (if auto-save-p 'auto-save-coding (or coding-system-for-read - explicit-buffer-file-coding-system)))) + buffer-file-coding-system-explicit)))) ;; This force after-insert-file-set-coding ;; (called from insert-file-contents) to set ;; buffer-file-coding-system to a proper value. -- cgit v1.2.1