X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fapropos.el;h=58391944695fe19e26598ff9e91e699fef85fa1d;hb=89cfab686d6faed92ea20ab29470c05d56a03aa2;hp=c7857ddf676278fbe878ede1581c781a62b544a6;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git

diff --git a/lisp/apropos.el b/lisp/apropos.el
index c7857dd..5839194 100644
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -309,7 +309,7 @@ Returns list of symbols and documentation found."
 	       (lambda (symbol)
 		 (setq f (apropos-safe-documentation symbol)
 		       v (get symbol 'variable-documentation))
-		 (if (integerp v) (setq v))
+		 (when (integerp v) (setq v nil))
 		 (setq f (apropos-documentation-internal f)
 		       v (apropos-documentation-internal v))
 		 (if (or f v)