From 1a5bfb0ed7b4f20acde1327908046b365042142e Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Mon, 21 May 2007 16:43:27 +0000 Subject: [PATCH] (magic-mode-alist): Remove image-type-auto-detected-p. (magic-fallback-mode-alist): Add image-type-auto-detected-p. --- lisp/files.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 7d7fbc98398..f4cec49fbb9 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2119,8 +2119,7 @@ is assumed to be interpreted by the interpreter matched by the second group of the regular expression. The mode is then determined as the mode associated with that interpreter in `interpreter-mode-alist'.") -(defvar magic-mode-alist - `((image-type-auto-detected-p . image-mode)) +(defvar magic-mode-alist nil "Alist of buffer beginnings vs. corresponding major mode functions. Each element looks like (REGEXP . FUNCTION) or (MATCH-FUNCTION . FUNCTION). After visiting a file, if REGEXP matches the text at the beginning of the @@ -2133,7 +2132,8 @@ If FUNCTION is nil, then it is not called. (That is a way of saying (put 'magic-mode-alist 'risky-local-variable t) (defvar magic-fallback-mode-alist - `(;; The < comes before the groups (but the first) to reduce backtracking. + `((image-type-auto-detected-p . image-mode) + ;; The < comes before the groups (but the first) to reduce backtracking. ;; TODO: UTF-16