From 544dd97560301827451af6e7c1c75872dbfa1b98 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 14 Feb 2003 06:55:32 +0000 Subject: [PATCH] (view-hello-file): Use `view-file' instead of `find-file-read-only'. --- lisp/ChangeLog | 5 +++++ lisp/international/mule-cmds.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 97240909104..89724f7323d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-02-14 Juanma Barranquero + + * international/mule-cmds.el (view-hello-file): Use `view-file' + instead of `find-file-read-only'. + 2003-02-13 Markus Rost * files.el (find-alternate-file): Undo last change. diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 92df9fcb4c0..01bb05a0955 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -264,7 +264,7 @@ wrong, use this command again to toggle back to the right mode." ;; 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." -- 2.39.2