From 8e999f70ab17da9006eec0bac77dc3a3502a5eed Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 20 Aug 2011 15:26:52 -0700 Subject: [PATCH] * lisp/files.el (hack-local-variables): Fully ignore case for "mode:". --- lisp/ChangeLog | 4 ++++ lisp/files.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) 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 + + * files.el (hack-local-variables): Fully ignore case for "mode:". + 2011-08-20 Alan Mackenzie 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) -- 2.39.2