(image-mode-maybe): Prevent magic-mode-alist from

interfering with attempt to set major mode from modified
auto-mode-alist.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index 3e10afcbfeb..13a689b6061 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -105,7 +105,8 @@ information on these modes."
                          elt))
                      auto-mode-alist))))
     (if (assoc-default buffer-file-name mode-alist 'string-match)
-        (let ((auto-mode-alist mode-alist))
+        (let ((auto-mode-alist mode-alist)
+              (magic-mode-alist nil))
           (set-auto-mode)
           (image-minor-mode t))
       (image-mode))))