summaryrefslogtreecommitdiff
path: root/lisp/vc/log-edit.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2010-10-28 10:36:59 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2010-10-28 10:36:59 -0400
commita62b88d4015d62f97dccf53ea1fb7d740ebcd718 (patch)
treeb62644f0a2dd3e269962ac096f468da345a09b8b /lisp/vc/log-edit.el
parent4abff9048dc9462bf4beb06087d441bcfc19d8bc (diff)
downloademacs-a62b88d4015d62f97dccf53ea1fb7d740ebcd718.tar.gz
* lisp/vc/log-edit.el (log-edit-rewrite-fixes): State its safety pred.
Diffstat (limited to 'lisp/vc/log-edit.el')
-rw-r--r--lisp/vc/log-edit.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/vc/log-edit.el b/lisp/vc/log-edit.el
index 80d77213abf..c0aa595d968 100644
--- a/lisp/vc/log-edit.el
+++ b/lisp/vc/log-edit.el
@@ -579,6 +579,8 @@ The value should be of the form (REGEXP . REPLACEMENT)
where REGEXP should match the expression referring to a bug number
in the text, and REPLACEMENT is an expression to pass to `replace-match'
to build the Fixes: header.")
+(put 'log-edit-rewrite-fixes 'safe-local-variable
+ (lambda (v) (and (stringp (car-safe v)) (stringp (cdr v)))))
(defun log-edit-insert-changelog (&optional use-first)
"Insert a log message by looking at the ChangeLog.