[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master e927a36: * lisp/international/mule-cmds.el (view-he

From: Stefan Monnier
Subject: [Emacs-diffs] master e927a36: * lisp/international/mule-cmds.el (view-hello-file): Avoid duplicate
Date: Fri, 20 Apr 2018 09:17:19 -0400 (EDT)

branch: master
commit e927a36f3cf974a57094d10023ee075bb4596fb9
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * lisp/international/mule-cmds.el (view-hello-file): Avoid duplicate
    Don't hardcode the coding-system, now that it's specified with a "coding:" 
 lisp/international/mule-cmds.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c66cc67..6c49b8f 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -281,9 +281,7 @@ wrong, use this command again to toggle back to the right 
 (defun view-hello-file ()
   "Display the HELLO file, which lists many languages and characters."
-  ;; We have to decode the file in any environment.
-  (let ((coding-system-for-read 'utf-8))
-    (view-file (expand-file-name "HELLO" data-directory))))
+  (view-file (expand-file-name "HELLO" data-directory)))
 (defun universal-coding-system-argument (coding-system)
   "Execute an I/O command using the specified coding system."

reply via email to

[Prev in Thread] Current Thread [Next in Thread]