# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 712949028 0
# Node ID f23882d7315a0971d213645fde51e63fadd09c5e
# Parent  1dac458b51175c5f62212f5c063258be6c5f5afe
entered into RCS

diff -r 1dac458b5117 -r f23882d7315a lisp/view.el
--- 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)