From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 26 Apr 2006 05:25:32 +0000 (+0000)
Subject: (time-stamp-start, time-stamp-end, time-stamp-inserts-lines):
X-Git-Tag: emacs-pretest-22.0.90~2957
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=72c0b9b8fabda157c6454717ff5e94a49b55a590;p=emacs.git

(time-stamp-start, time-stamp-end, time-stamp-inserts-lines):
Tighten up a bit the safety predicate.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fcc049feb28..bf5bb40f5cf 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-04-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* time-stamp.el (time-stamp-start, time-stamp-end)
+	(time-stamp-inserts-lines): Tighten up a bit the safety predicate.
+
 	* add-log.el: Remove spurious * in docstrings.
 	(add-log-time-zone-rule): Rename from change-log-time-zone-rule.
 	(add-change-log-entry): Use it here, since it's not specific
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el
index 1c51c4c55ab..c66736a3594 100644
--- a/lisp/time-stamp.el
+++ b/lisp/time-stamp.el
@@ -164,7 +164,7 @@ Do not change `time-stamp-line-limit', `time-stamp-start',
 incompatible with other people's files!  If you must change them for some
 application, do so in the local variables section of the time-stamped file
 itself.")
-;;;###autoload(put 'time-stamp-start 'safe-local-variable t)
+;;;###autoload(put 'time-stamp-start 'safe-local-variable 'stringp)
 
 (defvar time-stamp-end "\\\\?[\">]"    ;Do not change!
   "Regexp marking the text after the time stamp.
@@ -184,7 +184,7 @@ Do not change `time-stamp-start', `time-stamp-end', `time-stamp-pattern',
 or `time-stamp-inserts-lines' for yourself or you will be incompatible
 with other people's files!  If you must change them for some application,
 do so in the local variables section of the time-stamped file itself.")
-;;;###autoload(put 'time-stamp-end 'safe-local-variable t)
+;;;###autoload(put 'time-stamp-end 'safe-local-variable 'stringp)
 
 
 (defvar time-stamp-inserts-lines nil    ;Do not change!
@@ -201,7 +201,7 @@ Do not change `time-stamp-end' or `time-stamp-inserts-lines' for
 yourself or you will be incompatible with other people's files!
 If you must change them for some application, do so in the local
 variables section of the time-stamped file itself.")
-;;;###autoload(put 'time-stamp-inserts-lines 'safe-local-variable t)
+;;;###autoload(put 'time-stamp-inserts-lines 'safe-local-variable 'symbolp)
 
 
 (defvar time-stamp-count 1		;Do not change!