* lisp/files.el (safe-local-eval-forms): Add the write-file-hooks version.

This obsolete form is still supported, and present in some of the
files synced from gnulib, for example.
This commit is contained in:
Glenn Morris 2011-02-22 19:24:23 -08:00
parent 7dde5efea3
commit 5582c6706a
2 changed files with 8 additions and 2 deletions

View file

@ -1,3 +1,7 @@
2011-02-23 Glenn Morris <rgm@gnu.org>
* files.el (safe-local-eval-forms): Add the write-file-hooks version.
2011-02-22 Stefan Monnier <monnier@iro.umontreal.ca>
* help-fns.el (describe-function-1): Don't signal an error just because

View file

@ -2806,7 +2806,9 @@ symbol and VAL is a value that is considered safe."
:type 'alist)
(defcustom safe-local-eval-forms
'((add-hook 'write-file-functions 'time-stamp)
;; This should be here at least as long as Emacs supports write-file-hooks.
'((add-hook 'write-file-hooks 'time-stamp)
(add-hook 'write-file-functions 'time-stamp)
(add-hook 'before-save-hook 'time-stamp))
"Expressions that are considered safe in an `eval:' local variable.
Add expressions to this list if you want Emacs to evaluate them, when
@ -2814,7 +2816,7 @@ they appear in an `eval' local variable specification, without first
asking you for confirmation."
:risky t
:group 'find-file
:version "22.2"
:version "24.1" ; added write-file-hooks
:type '(repeat sexp))
;; Risky local variables: