From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Thu, 10 Jan 2008 14:01:13 +0000 (+0000)
Subject: (safe-local-eval-forms): Mark
X-Git-Tag: emacs-pretest-22.1.90~112
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=146b3daf07f58412b21d44b95e43d48c9719c78b;p=emacs.git

(safe-local-eval-forms): Mark
(add-hook 'write-file-hooks 'time-stamp) as safe.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c54e9abec57..389f7b70fb7 100644
--- 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 aa6e7f1082a..ea327f48f2c 100644
--- 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: