comparison lisp/help.el @ 23818:19e467700712

(describe-function-1): Fix description for alias.
author Dave Love <fx@gnu.org>
date Fri, 04 Dec 1998 11:54:56 +0000
parents 5475f2331d88
children e9fe8ed71303
comparison
equal deleted inserted replaced
23817:efa2dd070256 23818:19e467700712
589 ((byte-code-function-p def) 589 ((byte-code-function-p def)
590 (concat beg "compiled Lisp function")) 590 (concat beg "compiled Lisp function"))
591 ((symbolp def) 591 ((symbolp def)
592 (while (symbolp (symbol-function def)) 592 (while (symbolp (symbol-function def))
593 (setq def (symbol-function def))) 593 (setq def (symbol-function def)))
594 (format "alias for `%s'" def)) 594 (format "an alias for `%s'" def))
595 ((eq (car-safe def) 'lambda) 595 ((eq (car-safe def) 'lambda)
596 (concat beg "Lisp function")) 596 (concat beg "Lisp function"))
597 ((eq (car-safe def) 'macro) 597 ((eq (car-safe def) 'macro)
598 "a Lisp macro") 598 "a Lisp macro")
599 ((eq (car-safe def) 'mocklisp) 599 ((eq (car-safe def) 'mocklisp)