(safe-local-eval-forms): Mark

(add-hook 'write-file-hooks 'time-stamp) as safe.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c54e9abec5701b503deb71f98cb1938e074f4ebb..389f7b70fb7755d9e737c8e667bb296f1575a0cd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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>
 
        * comint.el (comint-insert-input): Set point first.
 
        * progmodes/gdb-ui.el (gdb-dequeue-input): Make doubly sure
        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.
 
 2008-01-10  Dan Nicolaescu  <dann@ics.uci.edu>

diff --git a/lisp/files.el b/lisp/files.el
index aa6e7f1082ac9963f29e28cedfe5edfc1757b464..ea327f48f2c03537461d91f6311303fb9759ea71 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2418,13 +2418,13 @@ symbol and VAL is a value that is considered safe."
   :group 'find-file
   :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.
 Add expressions to this list if you want Emacs to evaluate them, when
 they appear in an `eval' local variable specification, without first
 asking you for confirmation."
   :group 'find-file
-  :version "22.1"
+  :version "22.2"
   :type '(repeat sexp))
 
 ;; Risky local variables: