changeset 23922:81d1dacd379e

(describe-function-1): Say "keymap", not "Lisp macro", if this is an autoloaded keymap.
author Andreas Schwab <schwab@suse.de>
date Mon, 21 Dec 1998 10:03:01 +0000
parents 81a6345fd5e8
children 950f2c278c9a
files lisp/help.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/help.el	Mon Dec 21 09:59:30 1998 +0000
+++ b/lisp/help.el	Mon Dec 21 10:03:01 1998 +0000
@@ -620,9 +620,10 @@
 		 "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 "")))