(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 fcc049feb288146cba9d28c5b18789d2e9423e7f..bf5bb40f5cf38b26908a4836244172fb059e290f 100644 (file)
--- 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 1c51c4c55abb6f7a0243dac4ba19e3ac8be03e8e..c66736a35948404f446fc33f725b4d6005953b95 100644 (file)
--- 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!