Mercurial > emacs
changeset 46329:081502d6dd98
(help-map): Add binding for info-emacs-manual.
(print-help-return-message): Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 12 Jul 2002 22:57:11 +0000 |
| parents | 761b6bcbb552 |
| children | 04fc40356d65 |
| files | lisp/help.el |
| diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help.el Fri Jul 12 17:46:11 2002 +0000 +++ b/lisp/help.el Fri Jul 12 22:57:11 2002 +0000 @@ -98,6 +98,8 @@ (autoload 'finder-by-keyword "finder" "Find packages matching a given keyword." t) +(define-key help-map "r" 'info-emacs-manual) + (define-key help-map "s" 'describe-syntax) (define-key help-map "t" 'help-with-tutorial) @@ -123,8 +125,9 @@ (defun print-help-return-message (&optional function) "Display or return message saying how to restore windows after help command. -Computes a message and applies the optional argument FUNCTION to it. -If FUNCTION is nil, applies `message' to it, thus printing it." +This function assumes that `standard-output' is the help buffer. +It computes a message, and applies the optional argument FUNCTION to it. +If FUNCTION is nil, it applies `message', thus displaying the message." (and (not (get-buffer-window standard-output)) (let ((first-message (cond ((special-display-p (buffer-name standard-output))