From: Andreas Schwab Date: Mon, 21 Dec 1998 10:03:01 +0000 (+0000) Subject: (describe-function-1): Say "keymap", not "Lisp macro", X-Git-Tag: emacs-20.4~1027 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aed2b2cd476e0b22830488356b53f8d64f559c1b;p=emacs.git (describe-function-1): Say "keymap", not "Lisp macro", if this is an autoloaded keymap. --- diff --git a/lisp/help.el b/lisp/help.el index ddc67c43432..051c56e65ba 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -620,9 +620,10 @@ It can also be nil, if the definition is not associated with any file." "a mocklisp function") ((eq (car-safe def) 'autoload) (setq file-name (nth 1 def)) - (format "%s autoloaded Lisp %s" + (format "%s autoloaded %s" (if (commandp def) "an interactive" "an") - (if (nth 4 def) "macro" "function") + (if (eq (nth 4 def) 'keymap) "keymap" + (if (nth 4 def) "Lisp macro" "Lisp function")) )) (t ""))) (when (and parens (not (equal string "")))