Mercurial > emacs
changeset 1894:73a56a618d25
(super-apropos-check-doc-file): Look for DOC file in proper directory.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 20 Feb 1993 23:12:21 +0000 |
| parents | b047e77f3be4 |
| children | b497a7ec0d58 |
| files | lisp/apropos.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/apropos.el Sat Feb 20 17:36:06 1993 +0000 +++ b/lisp/apropos.el Sat Feb 20 23:12:21 1993 +0000 @@ -127,9 +127,10 @@ ;; Returns an alist of form ((symbol fn-doc var-doc) ...). (defun super-apropos-check-doc-file (regexp) - (let ((doc-buffer (find-file-noselect internal-doc-file-name t)) - ;; (doc-buffer (or (get-file-buffer internal-doc-file-name) - ;; (find-file-noselect internal-doc-file-name))) + (let* ((doc-file (concat data-directory internal-doc-file-name)) + (doc-buffer (find-file-noselect doc-file t)) + ;; (doc-buffer (or (get-file-buffer doc-file) + ;; (find-file-noselect doc-file))) type symbol doc sym-list) (save-excursion (set-buffer doc-buffer)