* 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
This commit is contained in:
Stefan Monnier 2018-04-20 09:16:55 -04:00
parent e2ae724460
commit e927a36f3c

View file

@ -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."