comparison lisp/textmodes/paragraphs.el @ 69830:196122ba0b05

* subr.el (string-or-null-p): New function. * textmodes/paragraphs.el (sentence-end): Use string-or-null-p. * textmodes/ispell.el (ispell-local-dictionary): Use string-or-null-p. * files.el: Update comment about safe-local-variable declarations.
author Reiner Steib <Reiner.Steib@gmx.de>
date Thu, 06 Apr 2006 19:20:38 +0000
parents 684aaf007d39
children 1fd89e2b70fd 65ca8fb66a0d
comparison
equal deleted inserted replaced
69829:4341d4876712 69830:196122ba0b05
161 The value nil means to use the default value defined by the 161 The value nil means to use the default value defined by the
162 function `sentence-end'. You should always use this function 162 function `sentence-end'. You should always use this function
163 to obtain the value of this variable." 163 to obtain the value of this variable."
164 :group 'paragraphs 164 :group 'paragraphs
165 :type '(choice regexp (const :tag "Use default value" nil))) 165 :type '(choice regexp (const :tag "Use default value" nil)))
166 ;;;###autoload(put 'sentence-end 'safe-local-variable (lambda (a) (or (stringp a) (null a)))) 166 ;;;###autoload(put 'sentence-end 'safe-local-variable 'string-or-null-p)
167 167
168 (defcustom sentence-end-base "[.?!][]\"'$B!I$,1r}(B)}]*" 168 (defcustom sentence-end-base "[.?!][]\"'$B!I$,1r}(B)}]*"
169 "*Regexp matching the basic end of a sentence, not including following space." 169 "*Regexp matching the basic end of a sentence, not including following space."
170 :group 'paragraphs 170 :group 'paragraphs
171 :type 'string 171 :type 'string