diff options
| author | Eric S. Raymond | 1992-08-04 17:23:48 +0000 |
|---|---|---|
| committer | Eric S. Raymond | 1992-08-04 17:23:48 +0000 |
| commit | 802e7beba48c7e71550aa410709a9fb124c46a14 (patch) | |
| tree | ee71ee74b6cb571722644e0026e0169c3f5bab8f /lisp | |
| parent | 803eaf50c2fd81c1afe4355d248c76653cde027d (diff) | |
| download | emacs-802e7beba48c7e71550aa410709a9fb124c46a14.tar.gz emacs-802e7beba48c7e71550aa410709a9fb124c46a14.zip | |
entered into RCS
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/view.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/view.el b/lisp/view.el index 245a4136deb..bcb54fee03c 100644 --- a/lisp/view.el +++ b/lisp/view.el | |||
| @@ -282,12 +282,8 @@ If you viewed a file that was not present in Emacs, its buffer is killed." | |||
| 282 | 282 | ||
| 283 | (defun view-helpful-message () | 283 | (defun view-helpful-message () |
| 284 | (message | 284 | (message |
| 285 | (if (and (eq (key-binding (char-to-string help-char)) 'Helper-help) | ||
| 286 | (eq (key-binding "?") 'Helper-describe-bindings) | ||
| 287 | (eq (key-binding "\C-c") 'view-exit)) | ||
| 288 | "Type \\[Helper-help] for help, ? for commands, C-c to quit" | ||
| 289 | (substitute-command-keys | 285 | (substitute-command-keys |
| 290 | "Type \\[Helper-help] for help, \\[Helper-describe-bindings] for commands, \\[view-exit] to quit.")))) | 286 | "Type \\[Helper-help] for help, \\[Helper-describe-bindings] for commands, \\[view-exit] to quit."))) |
| 291 | 287 | ||
| 292 | (defun View-undefined () | 288 | (defun View-undefined () |
| 293 | (interactive) | 289 | (interactive) |