Commit 6bf9bdb4 authored by Glenn Morris's avatar Glenn Morris

* lisp/files-x.el (add-file-local-variable):

Special-case 'lexical-binding'.  (Bug#20641)
parent d9d04bfa
......@@ -247,7 +247,14 @@ then this function adds the first line containing the string
`Local Variables:' and the last line containing the string `End:'."
(interactive
(let ((variable (read-file-local-variable "Add file-local variable")))
;; Error before reading value.
(if (equal variable 'lexical-binding)
(user-error "The `%s' variable must be set at the start of the file"
variable))
(list variable (read-file-local-variable-value variable) t)))
(if (equal variable 'lexical-binding)
(user-error "The `%s' variable must be set at the start of the file"
variable))
(modify-file-local-variable variable value 'add-or-replace interactive))
;;;###autoload
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment