diff options
| -rw-r--r-- | lisp/help.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el index 5da7ef0c03a..de5ac093dd5 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -179,8 +179,11 @@ If FUNCTION is nil, it applies `message', thus displaying the message." | |||
| 179 | ;; So keyboard macro definitions are documented correctly | 179 | ;; So keyboard macro definitions are documented correctly |
| 180 | (fset 'defining-kbd-macro (symbol-function 'start-kbd-macro)) | 180 | (fset 'defining-kbd-macro (symbol-function 'start-kbd-macro)) |
| 181 | 181 | ||
| 182 | (defalias 'help 'help-for-help) | 182 | (defalias 'help 'help-for-help-internal) |
| 183 | (make-help-screen help-for-help | 183 | ;; find-function can find this. |
| 184 | (defalias 'help-for-help 'help-for-help-internal) | ||
| 185 | ;; It can't find this, but nobody will look. | ||
| 186 | (make-help-screen help-for-help-internal | ||
| 184 | "a b c C e f F i I k C-k l L m p s t v w C-c C-d C-f C-n C-p C-t C-w . or ? :" | 187 | "a b c C e f F i I k C-k l L m p s t v w C-c C-d C-f C-n C-p C-t C-w . or ? :" |
| 185 | "You have typed %THIS-KEY%, the help character. Type a Help option: | 188 | "You have typed %THIS-KEY%, the help character. Type a Help option: |
| 186 | \(Use SPC or DEL to scroll through this text. Type \\<help-map>\\[help-quit] to exit the Help command.) | 189 | \(Use SPC or DEL to scroll through this text. Type \\<help-map>\\[help-quit] to exit the Help command.) |