Commit 37fd9666 authored by Richard M. Stallman's avatar Richard M. Stallman

(hack-one-local-variable): Treat varnames ending in -form or -forms like eval.

parent 1576fe1d
......@@ -1112,7 +1112,8 @@ If `enable-local-variables' is nil, this function does not check for a
;; "Setting" eval means either eval it or do nothing.
;; Likewise for setting hook variables.
((or (memq var '(eval file-name-handler-alist after-load-alist))
(string-match "-hooks?$\\|-functions?$" (symbol-name var)))
(string-match "-hooks?$\\|-functions?$\\|-forms?$"
(symbol-name var)))
(if (and (not (string= (user-login-name) "root"))
(or (eq enable-local-eval t)
(and enable-local-eval
......
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