diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-04-13 19:00:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-04-13 19:00:07 +0000 |
| commit | ad21a8762e50cafd77daf4beed3a5f11b82e3aa0 (patch) | |
| tree | 836bd73263be99977805f71ad6575b83bf2450de /lisp/apropos.el | |
| parent | 0d25a4bd5d456c91cb44e88ce0ca975dd1821bf7 (diff) | |
| download | emacs-ad21a8762e50cafd77daf4beed3a5f11b82e3aa0.tar.gz | |
(super-apropos-check-doc-file): Force Fundamental mode.
Diffstat (limited to 'lisp/apropos.el')
| -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 1cd37310e1c..98086c20f70 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -120,9 +120,10 @@ Returns list of symbols and documentation found." (defun super-apropos-check-doc-file (regexp) (let* ((doc-file (concat doc-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))) + (doc-buffer + ;; Force fundamental mode for the DOC file. + (let (auto-mode-alist) + (find-file-noselect doc-file t))) type symbol doc sym-list) (save-excursion (set-buffer doc-buffer) |