aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/help.el
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>2005-02-10 06:46:42 +0000
committerRichard M. Stallman <[email protected]>2005-02-10 06:46:42 +0000
commita4bdcdf3788ae972a2a7c701f97bd2c2865491fc (patch)
tree3a6a06a71d0887049f813638e4f68ff26e1a96d8 /lisp/help.el
parent723c911c93ca003d3c0cfb94bb3deea4f5ca949e (diff)
(help-for-help-internal): Renamed from help-for-help.
(help-for-help): Define with defalias.
Diffstat (limited to 'lisp/help.el')
-rw-r--r--lisp/help.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 5da7ef0c03..de5ac093dd 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -179,8 +179,11 @@ If FUNCTION is nil, it applies `message', thus displaying the message."
;; So keyboard macro definitions are documented correctly
(fset 'defining-kbd-macro (symbol-function 'start-kbd-macro))
-(defalias 'help 'help-for-help)
-(make-help-screen help-for-help
+(defalias 'help 'help-for-help-internal)
+;; find-function can find this.
+(defalias 'help-for-help 'help-for-help-internal)
+;; It can't find this, but nobody will look.
+(make-help-screen help-for-help-internal
"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 ? :"
"You have typed %THIS-KEY%, the help character. Type a Help option:
\(Use SPC or DEL to scroll through this text. Type \\<help-map>\\[help-quit] to exit the Help command.)