Mercurial > emacs
comparison lisp/help.el @ 1467:8d8c91b563ee
(describe-function): Print `an autoloaded', not `a ...'.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 23 Oct 1992 09:19:12 +0000 |
parents | 567b06901789 |
children | 04fb1d3d6992 |
comparison
equal
deleted
inserted
replaced
1466:04b4499061fd | 1467:8d8c91b563ee |
---|---|
302 ((eq (car-safe def) 'macro) | 302 ((eq (car-safe def) 'macro) |
303 "a Lisp macro.") | 303 "a Lisp macro.") |
304 ((eq (car-safe def) 'mocklisp) | 304 ((eq (car-safe def) 'mocklisp) |
305 "a mocklisp function.") | 305 "a mocklisp function.") |
306 ((eq (car-safe def) 'autoload) | 306 ((eq (car-safe def) 'autoload) |
307 (format "%sautoloaded Lisp %s." | 307 (format "%s autoloaded Lisp %s." |
308 beg | 308 (if (commandp def) "an interactive" "an") |
309 (if (nth 4 def) "macro" "function") | 309 (if (nth 4 def) "macro" "function") |
310 ;;; Including the file name made this line too long. | 310 ;;; Including the file name made this line too long. |
311 ;;; (nth 1 def) | 311 ;;; (nth 1 def) |
312 )) | 312 )) |
313 (t ""))) | 313 (t ""))) |