# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1287103431 -32400
# Node ID b8a933b2286c71a147221cb7ebca361490162f4e
# Parent  734b2470f93c6a3c115bf59510985823be17863e# Parent  db77dacc48e1f42117981ba66b8767256de5a73a
international/characters.el: Add category '|' (word breakable) to fullwidth characters.

diff -r 734b2470f93c -r b8a933b2286c lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Oct 14 14:25:35 2010 +0200
+++ b/lisp/ChangeLog	Fri Oct 15 09:43:51 2010 +0900
@@ -1,3 +1,8 @@
+2010-10-15  Kenichi Handa  <handa@m17n.org>
+
+	* international/characters.el: Add category '|' (word breakable)
+	to fullwidth characters.
+
 2010-10-14  Kenichi Handa  <handa@m17n.org>
 
 	* mail/rmail.el (rmail-show-message-1): Catch an error of
diff -r 734b2470f93c -r b8a933b2286c lisp/international/characters.el
--- a/lisp/international/characters.el	Thu Oct 14 14:25:35 2010 +0200
+++ b/lisp/international/characters.el	Fri Oct 15 09:43:51 2010 +0900
@@ -188,6 +188,9 @@
 			       cp932-2-byte))
   (map-charset-chars #'modify-category-entry l ?j))
 
+;; Fullwidth characters
+(modify-category-entry '(#xff01 . #xff60) ?\|)
+
 ;; Unicode equivalents of JISX0201-kana
 (let ((range '(#xff61 . #xff9f)))
   (modify-category-entry range  ?k)