Mercurial > hg > xemacs-beta

diff lisp/packages/hyper-apropos.el @ 155:43dd3413c7c7 r20-3b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents 34a5b81f86ba
children 28f395d8dc7a
line wrap: on
line diff
--- a/lisp/packages/hyper-apropos.el	Mon Aug 13 09:38:27 2007 +0200
+++ b/lisp/packages/hyper-apropos.el	Mon Aug 13 09:39:39 2007 +0200
@@ -1221,7 +1221,7 @@
   (mouse-set-point event)
   (let* ((sym (hypropos-this-symbol))
 	 (notjunk (not (null sym)))
-	 (command-p (commandp sym))
+	 (command-p (if (commandp sym) t))
 	 (variable-p (and sym (boundp sym)))
 	 (function-p (fboundp sym))
 	 (apropos-p (eq 'hyper-apropos-mode