* 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:
parent
7dde5efea3
commit
5582c6706a
2 changed files with 8 additions and 2 deletions
|
@ -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
|
||||
|
|
|
@ -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:
|
||||
|
|
Loading…
Add table
Reference in a new issue