diff options
| author | Philipp Stephani <phst@google.com> | 2017-06-16 23:49:09 +0200 |
|---|---|---|
| committer | Philipp Stephani <phst@google.com> | 2017-06-17 16:10:51 +0200 |
| commit | c3813b2aa8d2f5a625195fdbbfe6a01a602d7735 (patch) | |
| tree | 1bf3a0498632f317ed27e6e7d99171d611964f4d /lisp/international | |
| parent | 5575db9216e949fa1535dac33eec9b2abb48fab4 (diff) | |
| download | emacs-c3813b2aa8d2f5a625195fdbbfe6a01a602d7735.tar.gz | |
Allow local variables section to begin with a square bracket
Fixes Bug#27391.
* lisp/international/mule.el (find-auto-coding): Fix regular
expression for "Local Variables" section.
* test/lisp/international/mule-tests.el (find-auto-coding--bug27391):
Add unit test.
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index fa3ad80e2f7..6cfb7e6d457 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1970,7 +1970,7 @@ use \"coding: 'raw-text\" instead." (goto-char tail-start) (re-search-forward "[\r\n]\^L" tail-end t) (if (re-search-forward - "[\r\n]\\([^[\r\n]*\\)[ \t]*Local Variables:[ \t]*\\([^\r\n]*\\)[\r\n]" + "[\r\n]\\([^\r\n]*\\)[ \t]*Local Variables:[ \t]*\\([^\r\n]*\\)[\r\n]" tail-end t) ;; The prefix is what comes before "local variables:" in its ;; line. The suffix is what comes after "local variables:" |