Mercurial > hg > xemacs-beta

comparison lisp/apropos.el @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents cc15677e0335
children 74fd4e045ea6
comparison
equal deleted inserted replaced
379:76b7d63099ad 380:8626e4521993
307 (if do-all 307 (if do-all
308 (mapatoms 308 (mapatoms
309 (lambda (symbol) 309 (lambda (symbol)
310 (setq f (apropos-safe-documentation symbol) 310 (setq f (apropos-safe-documentation symbol)
311 v (get symbol 'variable-documentation)) 311 v (get symbol 'variable-documentation))
312 (if (integerp v) (setq v)) 312 (when (integerp v) (setq v nil))
313 (setq f (apropos-documentation-internal f) 313 (setq f (apropos-documentation-internal f)
314 v (apropos-documentation-internal v)) 314 v (apropos-documentation-internal v))
315 (if (or f v) 315 (if (or f v)
316 (if (setq apropos-item 316 (if (setq apropos-item
317 (cdr (assq symbol apropos-accumulator))) 317 (cdr (assq symbol apropos-accumulator)))