diff options
| author | Glenn Morris <rgm@gnu.org> | 2012-01-05 23:37:01 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2012-01-05 23:37:01 -0800 |
| commit | 7d5944b986d829dad02097f27120b1c4853263bf (patch) | |
| tree | 7baf00a4ea2b9065de1d4e793a654ca7ad1d254d /lisp/emacs-lisp | |
| parent | 98cc61deb661bdde495656bb95d0e728c1f360ac (diff) | |
| download | emacs-7d5944b986d829dad02097f27120b1c4853263bf.tar.gz emacs-7d5944b986d829dad02097f27120b1c4853263bf.tar.bz2 emacs-7d5944b986d829dad02097f27120b1c4853263bf.zip | |
Trivial bytecomp.el fix for file-local buffer-read-only.
* lisp/emacs-lisp/bytecomp.el (byte-compile-file): Do not propagate a
file local setting of buffer-read-only to the input buffer.
Fixes: debbugs:10419
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 749200db925..80e380f07ea 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1745,7 +1745,9 @@ The value is non-nil if there were no errors, nil if errors." (enable-local-eval nil)) ;; Arg of t means don't alter enable-local-variables. (normal-mode t) - (setq filename buffer-file-name)) + ;; There may be a file local variable setting (bug#10419). + (setq buffer-read-only nil + filename buffer-file-name)) ;; Set the default directory, in case an eval-when-compile uses it. (setq default-directory (file-name-directory filename))) ;; Check if the file's local variables explicitly specify not to |