changeset 931:f23882d7315a

entered into RCS
author Eric S. Raymond <esr@snark.thyrsus.com>
date Tue, 04 Aug 1992 17:23:48 +0000
parents 1dac458b5117
children a93f0b1ba909
files lisp/view.el
diffstat 1 files changed, 1 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/view.el	Tue Aug 04 17:18:16 1992 +0000
+++ b/lisp/view.el	Tue Aug 04 17:23:48 1992 +0000
@@ -282,12 +282,8 @@
 
 (defun view-helpful-message ()
   (message
-   (if (and (eq (key-binding (char-to-string help-char)) 'Helper-help)
-	    (eq (key-binding "?") 'Helper-describe-bindings)
-	    (eq (key-binding "\C-c") 'view-exit))
-       "Type \\[Helper-help] for help, ? for commands, C-c to quit"
      (substitute-command-keys
-      "Type \\[Helper-help] for help, \\[Helper-describe-bindings] for commands, \\[view-exit] to quit."))))
+      "Type \\[Helper-help] for help, \\[Helper-describe-bindings] for commands, \\[view-exit] to quit.")))
 
 (defun View-undefined ()
   (interactive)