Mercurial > emacs

changeset 14334:8b24fff422f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(view-mode-enter, View-scroll-lines-forward): Pass proper format string to message.
author Karl Heuer <kwzh@gnu.org>
date Thu, 25 Jan 1996 00:58:31 +0000
parents b14697aa6929
children ad54c20b5e62
files lisp/view.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/view.el	Thu Jan 25 00:58:10 1996 +0000
+++ b/lisp/view.el	Thu Jan 25 00:58:31 1996 +0000
@@ -262,7 +262,7 @@
   (setq goal-column nil)
 
   (run-hooks 'view-mode-hook)
-  (message
+  (message "%s"
      (substitute-command-keys
       "Type \\[help-command] for help, \\[describe-mode] for commands, \\[view-exit] to quit.")))
 
@@ -343,7 +343,8 @@
 	(scroll-up lines)))
     (cond ((pos-visible-in-window-p (point-max))
 	   (goto-char (point-max))
-	   (message (substitute-command-keys
+	   (message "%s"
+		    (substitute-command-keys
 		     "End.  Type \\[view-exit] to quit viewing."))))
     (move-to-window-line -1)
     (beginning-of-line)))