summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2018-04-20 09:16:55 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2018-04-20 09:16:55 -0400
commite927a36f3cf974a57094d10023ee075bb4596fb9 (patch)
treebef7b57cc6c4252e9fae7e7eed05785bd85c8b1f
parente2ae724460e6d73d3ddcc6066427471799c4bd57 (diff)
downloademacs-e927a36f3cf974a57094d10023ee075bb4596fb9.tar.gz
emacs-e927a36f3cf974a57094d10023ee075bb4596fb9.tar.bz2
emacs-e927a36f3cf974a57094d10023ee075bb4596fb9.zip
* lisp/international/mule-cmds.el (view-hello-file): Avoid duplicate
Don't hardcode the coding-system, now that it's specified with a "coding:" tag
-rw-r--r--lisp/international/mule-cmds.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c66cc6747de..6c49b8fa6a0 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 mode."
(defun view-hello-file ()
"Display the HELLO file, which lists many languages and characters."
(interactive)
- ;; 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."