mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-23 06:21:29 -07:00
Code Issues Projects Releases Wiki Activity

Change to utf-8. Adjust coding cookie.

Browse source 
(sentence-end-without-space): Delete duplicated chars.
(sentence-end-base): Likewise.
This commit is contained in:
Kenichi Handa 2009-08-18 01:17:51 +00:00
parent 563a866ec7
commit 988194903c
2 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2009-08-18 Kenichi Handa <handa@m17n.org>
* textmodes/paragraphs.el: Change to utf-8. Adjust coding cookie.
(sentence-end-without-space): Delete duplicated chars.
(sentence-end-base): Likewise.
2009-08-17 Chong Yidong <cyd@stupidchicken.com>
* files.el (hack-one-local-variable): If the mode function is for

6
lisp/textmodes/paragraphs.el
View file

@ -141,7 +141,7 @@ regexp describing the end of a sentence, when the value of the variable
(put 'sentence-end-without-period 'safe-local-variable 'booleanp)
(defcustom sentence-end-without-space
"$B!#!%!)!*$A!##.#?#!$(0!$!%!)!*$(G!$!%!)!*(B"
"。．？！"
"String of characters that end sentence without following spaces.
This value is used by the function `sentence-end' to construct the
@ -163,7 +163,7 @@ to obtain the value of this variable."
:type '(choice regexp (const :tag "Use default value" nil)))
(put 'sentence-end 'safe-local-variable 'string-or-null-p)
(defcustom sentence-end-base "[.?!][]\"'$B!I$,1r}(B)}]*"
(defcustom sentence-end-base "[.?!][]\"'”)}]*"
"Regexp matching the basic end of a sentence, not including following space."
:group 'paragraphs
:type 'string
@ -514,7 +514,7 @@ ones already marked."
(transpose-subr 'forward-sentence arg))
;; Local Variables:
;; coding: iso-2022-7bit
;; coding: utf-8
;; End:
;; arch-tag: e727eb1a-527a-4464-b9d7-9d3ec0d1a575