Mercurial > emacs
changeset 70139:fa073d9c1a2b
(comment-start, comment-start-skip)
(comment-end-skip, comment-end): Mark as safe.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Thu, 20 Apr 2006 21:24:19 +0000 |
| parents | a11cae0b1787 |
| children | e7260a496ebf |
| files | lisp/ChangeLog lisp/newcomment.el |
| diffstat | 2 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Apr 20 20:14:50 2006 +0000 +++ b/lisp/ChangeLog Thu Apr 20 21:24:19 2006 +0000 @@ -1,3 +1,8 @@ +2006-04-20 Dan Nicolaescu <dann@ics.uci.edu> + + * newcomment.el (comment-start, comment-start-skip) + (comment-end-skip, comment-end): Mark as safe. + 2006-04-20 Carsten Dominik <dominik@science.uva.nl> * textmodes/org.el: (org-deadline-announce): Face removed.
--- a/lisp/newcomment.el Thu Apr 20 20:14:50 2006 +0000 +++ b/lisp/newcomment.el Thu Apr 20 21:24:19 2006 +0000 @@ -108,21 +108,25 @@ ;;;###autoload (defvar comment-start nil "*String to insert to start a new comment, or nil if no comment syntax.") +;;;###autoload(put 'comment-start 'safe-local-variable 'string-or-null-p) ;;;###autoload (defvar comment-start-skip nil "*Regexp to match the start of a comment plus everything up to its body. If there are any \\(...\\) pairs, the comment delimiter text is held to begin at the place matched by the close of the first pair.") +;;;###autoload(put 'comment-start-skip 'safe-local-variable 'string-or-null-p) ;;;###autoload (defvar comment-end-skip nil "Regexp to match the end of a comment plus everything up to its body.") +;;;###autoload(put 'comment-end-skip 'safe-local-variable 'string-or-null-p) ;;;###autoload (defvar comment-end "" "*String to insert to end a new comment. Should be an empty string if comments are terminated by end-of-line.") +;;;###autoload(put 'comment-end 'safe-local-variable 'string-or-null-p) ;;;###autoload (defvar comment-indent-function 'comment-indent-default