Mercurial > emacs

comparison lisp/apropos.el @ 105025:bc7e96c6811f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(apropos-documentation-check-doc-file): Avoid assignment to free variable `doc'.
author Glenn Morris <rgm@gnu.org>
date Tue, 15 Sep 2009 02:37:28 +0000
parents 5532cc06be89
children bd2966850aac
comparison
equal deleted inserted replaced
105024:3db1f3571655 105025:bc7e96c6811f
819 819
820 820
821 ;; Finds all documentation related to APROPOS-REGEXP in internal-doc-file-name. 821 ;; Finds all documentation related to APROPOS-REGEXP in internal-doc-file-name.
822 822
823 (defun apropos-documentation-check-doc-file () 823 (defun apropos-documentation-check-doc-file ()
824 (let (type symbol (sepa 2) sepb) 824 (let (type symbol (sepa 2) sepb doc)
825 (insert ?\^_) 825 (insert ?\^_)
826 (backward-char) 826 (backward-char)
827 (insert-file-contents (concat doc-directory internal-doc-file-name)) 827 (insert-file-contents (concat doc-directory internal-doc-file-name))
828 (forward-char) 828 (forward-char)
829 (while (save-excursion 829 (while (save-excursion