diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-04-26 05:25:32 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-04-26 05:25:32 +0000 |
| commit | 72c0b9b8fabda157c6454717ff5e94a49b55a590 (patch) | |
| tree | c538cf6b5c03cbdbdfdf721f175896f48d7fc8b4 /lisp/time-stamp.el | |
| parent | d1921057f3b136147d877f13a9daaf21fe137ec8 (diff) | |
| download | emacs-72c0b9b8fabda157c6454717ff5e94a49b55a590.tar.gz | |
(time-stamp-start, time-stamp-end, time-stamp-inserts-lines):
Tighten up a bit the safety predicate.
Diffstat (limited to 'lisp/time-stamp.el')
| -rw-r--r-- | lisp/time-stamp.el | 6 |
1 files changed, 3 insertions, 3 deletions
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! |