changeset 49779:2207016a3e9e

(view-hello-file): Use `view-file' instead of `find-file-read-only'.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 14 Feb 2003 06:54:44 +0000
parents 84da4f0bdf5d
children ded40de41858
files lisp/international/mule-cmds.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Thu Feb 13 23:05:37 2003 +0000
+++ b/lisp/international/mule-cmds.el	Fri Feb 14 06:54:44 2003 +0000
@@ -264,7 +264,7 @@
   ;; We have to decode the file in any environment.
   (let ((default-enable-multibyte-characters t)
 	(coding-system-for-read 'iso-2022-7bit))
-    (find-file-read-only (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."