From 68875f0e7b0b8a883dcbcbc9ce18e9bb3dc63cee Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 1 Dec 2000 15:30:43 +0000 Subject: [PATCH] (revert-buffer, recover-file): Bind coding-system-for-read to emacs-mule-unix, not to no-conversion. --- lisp/ChangeLog | 5 +++++ lisp/files.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5060dabea57..d575cba5b9a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-12-01 Eli Zaretskii + + * files.el (revert-buffer, recover-file): Bind + coding-system-for-read to emacs-mule-unix, not to no-conversion. + 2000-12-01 Gerd Moellmann * hi-lock.el (hi-lock-refontify): Call jit-lock-refontify. diff --git a/lisp/files.el b/lisp/files.el index 973f7bc9de0..579ad907404 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -3014,7 +3014,7 @@ non-nil, it is called instead of rereading visited file contents." (let ((coding-system-for-read ;; Auto-saved file shoule be read without ;; any code conversion. - (if auto-save-p 'no-conversion + (if auto-save-p 'emacs-mule-unix coding-system-for-read))) ;; Note that this preserves point in an intelligent way. (insert-file-contents file-name (not auto-save-p) @@ -3065,7 +3065,7 @@ non-nil, it is called instead of rereading visited file contents." ;; Keep the current buffer-file-coding-system. (coding-system buffer-file-coding-system) ;; Auto-saved file shoule be read without any code conversion. - (coding-system-for-read 'no-conversion)) + (coding-system-for-read 'emacs-mule-unix)) (erase-buffer) (insert-file-contents file-name nil) (set-buffer-file-coding-system coding-system)) -- 2.39.5