From 146b3daf07f58412b21d44b95e43d48c9719c78b Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Thu, 10 Jan 2008 14:01:13 +0000 Subject: [PATCH] (safe-local-eval-forms): Mark (add-hook 'write-file-hooks 'time-stamp) as safe. --- lisp/ChangeLog | 7 ++++++- lisp/files.el | 4 ++-- 2 files changed, 8 insertions(+), 3 deletions(-) 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 + + * files.el (safe-local-eval-forms): Mark + (add-hook 'write-file-hooks 'time-stamp) as safe. + 2008-01-10 Nick Roberts * 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 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: -- 2.39.2