diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-04-26 05:28:47 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-04-26 05:28:47 +0000 |
| commit | 49011d46973dde1c699484fbd3607df10ee78145 (patch) | |
| tree | 4d2e777127b2f835164d1d387689a9dcf89e9784 /lisp/textmodes/paragraphs.el | |
| parent | a1c43d02e9a4c6aba699951ab0768ca120f3cb59 (diff) | |
| download | emacs-49011d46973dde1c699484fbd3607df10ee78145.tar.gz | |
(sentence-end-double-space, sentence-end-without-period)
(sentence-end-without-space, page-delimiter, paragraph-ignore-fill-prefix):
Tighten up a bit the safety predicate.
Diffstat (limited to 'lisp/textmodes/paragraphs.el')
| -rw-r--r-- | lisp/textmodes/paragraphs.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index 6693be4e0c9..9e7d02182ef 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el @@ -128,7 +128,7 @@ regexp describing the end of a sentence, when the value of the variable `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :type 'boolean :group 'fill) -;;;###autoload(put 'sentence-end-double-space 'safe-local-variable t) +;;;###autoload(put 'sentence-end-double-space 'safe-local-variable 'symbolp) (defcustom sentence-end-without-period nil "*Non-nil means a sentence will end without a period. @@ -140,7 +140,7 @@ regexp describing the end of a sentence, when the value of the variable `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :type 'boolean :group 'fill) -;;;###autoload(put 'sentence-end-without-period 'safe-local-variable t) +;;;###autoload(put 'sentence-end-without-period 'safe-local-variable 'symbolp) (defcustom sentence-end-without-space "$B!#!%!)!*$A!##.#?#!$(0!$!%!)!*$(G!$!%!)!*(B" @@ -151,7 +151,7 @@ regexp describing the end of a sentence, when the value of the variable `sentence-end' is nil. See Info node `(elisp)Standard Regexps'." :group 'paragraphs :type 'string) -;;;###autoload(put 'sentence-end-without-space 'safe-local-variable t) +;;;###autoload(put 'sentence-end-without-space 'safe-local-variable 'symbolp) (defcustom sentence-end nil "*Regexp describing the end of a sentence. @@ -198,14 +198,14 @@ in between. See Info node `(elisp)Standard Regexps'." "*Regexp describing line-beginnings that separate pages." :group 'paragraphs :type 'regexp) -;;;###autoload(put 'page-delimiter 'safe-local-variable t) +;;;###autoload(put 'page-delimiter 'safe-local-variable 'stringp) (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) +;;;###autoload(put 'paragraph-ignore-fill-prefix 'safe-local-variable 'symbolp) (defun forward-paragraph (&optional arg) "Move forward to end of paragraph. |