diff options
| author | Stefan Monnier | 2010-10-28 10:36:59 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2010-10-28 10:36:59 -0400 |
| commit | a62b88d4015d62f97dccf53ea1fb7d740ebcd718 (patch) | |
| tree | b62644f0a2dd3e269962ac096f468da345a09b8b /lisp/vc | |
| parent | 4abff9048dc9462bf4beb06087d441bcfc19d8bc (diff) | |
| download | emacs-a62b88d4015d62f97dccf53ea1fb7d740ebcd718.tar.gz emacs-a62b88d4015d62f97dccf53ea1fb7d740ebcd718.zip | |
* lisp/vc/log-edit.el (log-edit-rewrite-fixes): State its safety pred.
Diffstat (limited to 'lisp/vc')
| -rw-r--r-- | lisp/vc/log-edit.el | 2 |
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) | |||
| 579 | where REGEXP should match the expression referring to a bug number | 579 | where REGEXP should match the expression referring to a bug number |
| 580 | in the text, and REPLACEMENT is an expression to pass to `replace-match' | 580 | in the text, and REPLACEMENT is an expression to pass to `replace-match' |
| 581 | to build the Fixes: header.") | 581 | to build the Fixes: header.") |
| 582 | (put 'log-edit-rewrite-fixes 'safe-local-variable | ||
| 583 | (lambda (v) (and (stringp (car-safe v)) (stringp (cdr v))))) | ||
| 582 | 584 | ||
| 583 | (defun log-edit-insert-changelog (&optional use-first) | 585 | (defun log-edit-insert-changelog (&optional use-first) |
| 584 | "Insert a log message by looking at the ChangeLog. | 586 | "Insert a log message by looking at the ChangeLog. |