From a4bdcdf3788ae972a2a7c701f97bd2c2865491fc Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 10 Feb 2005 06:46:42 +0000 Subject: [PATCH] (help-for-help-internal): Renamed from help-for-help. (help-for-help): Define with defalias. --- lisp/help.el | 7 +++++-- 1 file 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." ;; 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-quit] to exit the Help command.) -- 2.39.5