Mercurial > emacs
diff lisp/textmodes/paragraphs.el @ 69818:684aaf007d39
* files.el: Move some `safe-local-variable' declarations to the
respective files.
* textmodes/ispell.el (ispell-check-comments)
(ispell-local-dictionary): Mark as safe.
* abbrev.el (abbrev-mode): Mark as safe.
* add-log.el (change-log-default-name): Mark as safe.
* textmodes/reftex-vars.el (reftex-vref-is-default)
(reftex-fref-is-default, reftex-level-indent)
(reftex-guess-label-type): Mark as safe.
* textmodes/fill.el (colon-double-space): Mark as safe.
* textmodes/paragraphs.el (paragraph-start, paragraph-separate)
(sentence-end-double-space, sentence-end-without-period)
(sentence-end-without-space, sentence-end, sentence-end-base)
(page-delimiter, paragraph-ignore-fill-prefix): Mark as safe.
author | Reiner Steib <Reiner.Steib@gmx.de> |
---|---|
date | Thu, 06 Apr 2006 15:36:24 +0000 |
parents | 067115a6e738 |
children | 196122ba0b05 |
line wrap: on
line diff
--- a/lisp/textmodes/paragraphs.el Thu Apr 06 10:35:22 2006 +0000 +++ b/lisp/textmodes/paragraphs.el Thu Apr 06 15:36:24 2006 +0000 @@ -98,6 +98,7 @@ hard newline are considered to match." :group 'paragraphs :type 'regexp) +;;;###autoload(put 'paragraph-start 'safe-local-variable 'stringp) ;; paragraph-start requires a hard newline, but paragraph-separate does not: ;; It is assumed that paragraph-separate is distinctive enough to be believed @@ -115,6 +116,7 @@ text indented by a margin setting." :group 'paragraphs :type 'regexp) +;;;###autoload(put 'paragraph-separate 'safe-local-variable 'stringp) (defcustom sentence-end-double-space t "*Non-nil means a single space does not end a sentence. @@ -126,6 +128,7 @@ `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :type 'boolean :group 'fill) +;;;###autoload(put 'sentence-end-double-space 'safe-local-variable t) (defcustom sentence-end-without-period nil "*Non-nil means a sentence will end without a period. @@ -137,6 +140,7 @@ `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :type 'boolean :group 'fill) +;;;###autoload(put 'sentence-end-without-period 'safe-local-variable t) (defcustom sentence-end-without-space "$B!#!%!)!*$A!##.#?#!$(0!$!%!)!*$(G!$!%!)!*(B" @@ -147,6 +151,7 @@ `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :group 'paragraphs :type 'string) +;;;###autoload(put 'sentence-end-without-space 'safe-local-variable t) (defcustom sentence-end nil "*Regexp describing the end of a sentence. @@ -158,12 +163,14 @@ to obtain the value of this variable." :group 'paragraphs :type '(choice regexp (const :tag "Use default value" nil))) +;;;###autoload(put 'sentence-end 'safe-local-variable (lambda (a) (or (stringp a) (null a)))) (defcustom sentence-end-base "[.?!][]\"'$B!I$,1r}(B)}]*" "*Regexp matching the basic end of a sentence, not including following space." :group 'paragraphs :type 'string :version "22.1") +;;;###autoload(put 'sentence-end-base 'safe-local-variable 'stringp) (defun sentence-end () "Return the regexp describing the end of a sentence. @@ -191,12 +198,14 @@ "*Regexp describing line-beginnings that separate pages." :group 'paragraphs :type 'regexp) +;;;###autoload(put 'page-delimiter 'safe-local-variable t) (defcustom paragraph-ignore-fill-prefix nil "*Non-nil means the paragraph commands are not affected by `fill-prefix'. This is desirable in modes where blank lines are the paragraph delimiters." :group 'paragraphs :type 'boolean) +;;;###autoload(put 'paragraph-ignore-fill-prefix 'safe-local-variable t) (defun forward-paragraph (&optional arg) "Move forward to end of paragraph.