Spelling fix.

[gnus] / lisp / mm-view.el

diff --git a/lisp/mm-view.el b/lisp/mm-view.el
index 9264228..6358e34 100644 (file)
--- a/lisp/mm-view.el
+++ b/lisp/mm-view.el
@@ -607,7 +607,10 @@ If MODE is not set, try to find mode automatically."
         (set (make-local-variable 'enable-local-variables) nil)
         (if mode
             (funcall mode)
-          (set-auto-mode))
+         (let ((auto-mode-alist
+                (delq (rassq 'doc-view-mode-maybe auto-mode-alist)
+                      (copy-sequence auto-mode-alist))))
+           (set-auto-mode)))
        ;; The mode function might have already turned on font-lock.
         ;; Do not fontify if the guess mode is fundamental.
        (unless (or (symbol-value 'font-lock-mode)