summaryrefslogtreecommitdiff
path: root/lisp/apropos.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1998-05-22 06:29:05 +0000
committerRichard M. Stallman <rms@gnu.org>1998-05-22 06:29:05 +0000
commitaf57e0fa0d6b924f15979fcc430782c44bba2aef (patch)
tree09a62f5b6bb5c5240f5ca7e26a090f74da49c2be /lisp/apropos.el
parent47414bc1e20d33147d489d294c5a71d7c876116b (diff)
downloademacs-af57e0fa0d6b924f15979fcc430782c44bba2aef.tar.gz
(apropos): Handle aliases for undefined functions.
Diffstat (limited to 'lisp/apropos.el')
-rw-r--r--lisp/apropos.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el
index 90fa4309f1b..f726029c7ea 100644
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -227,7 +227,10 @@ Returns list of symbols and documentation found."
(setcar p (list
(setq symbol (car p))
(when (fboundp symbol)
- (if (setq doc (documentation symbol t))
+ (if (setq doc (condition-case nil
+ (documentation symbol t)
+ (void-function
+ "(alias for undefined function)")))
(substring doc 0 (string-match "\n" doc))
"(not documented)"))
(when (boundp symbol)