(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.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 045bae9ed60da974d1a8a09e34d890ff0ea77828..823c4831a72e19b6f21f6b773503fe771ced5850 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2006-04-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * textmodes/paragraphs.el (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.
+
        * textmodes/fill.el (colon-double-space): Tighten up the safety pred.
 
        * progmodes/python.el (python-continuation-line-p)

diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el
index 6693be4e0c94d7e1b8beee1b0182d493550ee25c..9e7d02182ef18c051381fac6ddd82f86d8dbac4b 100644 (file)
--- 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
   "\e$B!#!%!)!*\e$A!##.#?#!\e$(0!$!%!)!*\e$(G!$!%!)!*\e(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.