Mercurial > hg > xemacs-beta

diff lisp/help-macro.el @ 2275:445bd1969ed0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-15 08:30:25 by stephent] fix void-function error in apropos <87656glyun.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Wed, 15 Sep 2004 08:30:27 +0000
parents 7039e6323819
children 308d34e9f07d
line wrap: on
line diff
--- a/lisp/help-macro.el	Wed Sep 15 04:26:16 2004 +0000
+++ b/lisp/help-macro.el	Wed Sep 15 08:30:27 2004 +0000
@@ -110,7 +110,11 @@
 	      (substitute-command-keys ,(eval help-line))))
 	 (when three-step-help
 	   (message "%s" line-prompt))
-	 (let* ((help-screen (documentation (quote ,fname)))
+	 (let* ((help-screen
+		 (condition-case nil
+		     (documentation (quote ,fname))
+		   (void-function "(alias for undefined function)")
+		   (error "(unexpected error from `documention')")))
 		;; We bind overriding-local-map for very small
 		;; sections, *excluding* where we switch buffers and
 		;; where we execute the chosen help command.