diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/files.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/files.el b/lisp/files.el index a4bb4f86d4e..ebd4d469f5c 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2247,10 +2247,11 @@ is specified, returning t if it is specified." endpos (thisbuf (current-buffer))) (save-excursion - (if (not (re-search-forward - (concat prefix "[ \t]*End:[ \t]*" suffix) - nil t)) - (error "Local variables list is not properly terminated")) + (unless (let ((case-fold-search t)) + (re-search-forward + (concat prefix "[ \t]*End:[ \t]*" suffix) + nil t)) + (error "Local variables list is not properly terminated")) (beginning-of-line) (setq endpos (point))) |