# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1045205684 0
# Node ID 2207016a3e9e772e541b6451f193c722699ac520
# Parent  84da4f0bdf5d7af45252dac7c95c02d8c8f75f47
(view-hello-file): Use `view-file' instead of `find-file-read-only'.

diff -r 84da4f0bdf5d -r 2207016a3e9e lisp/international/mule-cmds.el
--- 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."