mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-22 13:40:44 -08:00
Code Issues Projects Releases Wiki Activity

(safe-local-eval-forms): Mark

Browse source 
(add-hook 'write-file-hooks 'time-stamp) as safe.
This commit is contained in:
Dan Nicolaescu 2008-01-10 14:01:13 +00:00
parent d1497e8d4d
commit 146b3daf07
2 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,10 +1,15 @@
2008-01-10 Dan Nicolaescu <dann@ics.uci.edu>
* files.el (safe-local-eval-forms): Mark
(add-hook 'write-file-hooks 'time-stamp) as safe.
2008-01-10 Nick Roberts <nickrob@snap.net.nz> 2008-01-10 Nick Roberts <nickrob@snap.net.nz>
* comint.el (comint-insert-input): Set point first. * comint.el (comint-insert-input): Set point first.
* progmodes/gdb-ui.el (gdb-dequeue-input): Make doubly sure * progmodes/gdb-ui.el (gdb-dequeue-input): Make doubly sure
session doesn't hang because gdb-pending-triggers is non-nil. session doesn't hang because gdb-pending-triggers is non-nil.
(gdb-frame-handler): Use buffer-file-name instead of (gdb-frame-handler): Use buffer-file-name instead of
buffer-name in case of duplicate file names. buffer-name in case of duplicate file names.
2008-01-10 Dan Nicolaescu <dann@ics.uci.edu> 2008-01-10 Dan Nicolaescu <dann@ics.uci.edu>

4
lisp/files.el
View file

@ -2418,13 +2418,13 @@ symbol and VAL is a value that is considered safe."
:group 'find-file :group 'find-file
:type 'alist) :type 'alist)
(defcustom safe-local-eval-forms nil (defcustom safe-local-eval-forms '((add-hook 'write-file-hooks 'time-stamp))
"Expressions that are considered safe in an `eval:' local variable. "Expressions that are considered safe in an `eval:' local variable.
Add expressions to this list if you want Emacs to evaluate them, when Add expressions to this list if you want Emacs to evaluate them, when
they appear in an `eval' local variable specification, without first they appear in an `eval' local variable specification, without first
asking you for confirmation." asking you for confirmation."
:group 'find-file :group 'find-file
:version "22.1" :version "22.2"
:type '(repeat sexp)) :type '(repeat sexp))
;; Risky local variables: ;; Risky local variables: