diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/apropos.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 0e89fa585d6..864ac1db864 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -127,9 +127,10 @@ Returns list of symbols and documentation found." ;; 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) |