From: Glenn Morris <rgm@gnu.org>
Date: Sat, 20 Aug 2011 22:26:52 +0000 (-0700)
Subject: * lisp/files.el (hack-local-variables): Fully ignore case for "mode:".
X-Git-Tag: emacs-pretest-24.0.90~104^2~152^2~70^2~15^2~31
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8e999f70ab17da9006eec0bac77dc3a3502a5eed;p=emacs.git

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

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)