Mercurial > hg > xemacs-beta

comparison lisp/apropos.el @ 410:de805c49cfc1 r21-2-35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents 74fd4e045ea6
children 697ef44129c6
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
375 375
376 376
377 ;; Finds all documentation related to APROPOS-REGEXP in internal-doc-file-name. 377 ;; Finds all documentation related to APROPOS-REGEXP in internal-doc-file-name.
378 378
379 (defun apropos-documentation-check-doc-file () 379 (defun apropos-documentation-check-doc-file ()
380 (let (type symbol (sepa 2) sepb beg end) 380 (let (type symbol (sepa 2) sepb beg end doc)
381 (insert ?\^_) 381 (insert ?\^_)
382 (backward-char) 382 (backward-char)
383 (insert-file-contents (concat doc-directory internal-doc-file-name)) 383 (insert-file-contents (concat doc-directory internal-doc-file-name))
384 (forward-char) 384 (forward-char)
385 (while (save-excursion 385 (while (save-excursion