* lisp/files.el (hack-local-variables): Fully ignore case for "mode:".

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index efacb110d1b..2e06de9fd98 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-08-20  Glenn Morris  <rgm@gnu.org>
+
+        * files.el (hack-local-variables): Fully ignore case for "mode:".
+
 2011-08-20  Alan Mackenzie  <acm@muc.de>
 
         Resolve invalid use of a regexp in regexp-opt.
diff --git a/lisp/files.el b/lisp/files.el
index 8c7e63dda14..07188e152b3 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3154,7 +3154,8 @@ major-mode."
                            (var (let ((read-circle nil))
                                   (read str)))
                            val val2)
-                      (and (eq var 'Mode) (setq var 'mode))
+                      (and (equal (downcase (symbol-name var)) "mode")
+                           (setq var 'mode))
                       ;; Read the variable value.
                       (skip-chars-forward "^:")
                       (forward-char 1)