From: Kenichi Handa <handa@m17n.org>
Date: Sat, 5 Apr 1997 02:35:53 +0000 (+0000)
Subject: Change a category of one Japanese character.
X-Git-Tag: emacs-20.1~2649
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=210dede6168681aa100b8849c5abecb85290dd8c;p=emacs.git

Change a category of one Japanese character.
---

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index b5d627e2dc6..c7ec38e0d30 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -284,7 +284,8 @@
   (while (< row 127)
     (modify-category-entry (make-char 'japanese-jisx0208 row) ?C)
     (setq row (1+ row))))
-(let ((chars '(?ー ?゛ ?゜)))
+(modify-category-entry ?ー ?K)
+(let ((chars '(?゛ ?゜)))
   (while chars
     (modify-category-entry (car chars) ?K)
     (modify-category-entry (car chars) ?H)