diff options
| author | Richard M. Stallman | 2005-02-10 06:46:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-02-10 06:46:42 +0000 |
| commit | a4bdcdf3788ae972a2a7c701f97bd2c2865491fc (patch) | |
| tree | 3a6a06a71d0887049f813638e4f68ff26e1a96d8 | |
| parent | 723c911c93ca003d3c0cfb94bb3deea4f5ca949e (diff) | |
| download | emacs-a4bdcdf3788ae972a2a7c701f97bd2c2865491fc.tar.gz emacs-a4bdcdf3788ae972a2a7c701f97bd2c2865491fc.zip | |
(help-for-help-internal): Renamed from help-for-help.
(help-for-help): Define with defalias.
| -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.) |