summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIkumi Keita <ikumi@ikumi.que.jp>2016-06-01 08:33:05 +0900
committerK. Handa <handa@gnu.org>2016-06-01 08:33:05 +0900
commit58f77a137a84caac05611d0ea706d7707978b629 (patch)
treede29b689ef676ef4c362c87db6de5f76e4c35626
parent4efef3db2fb1c3a20b83a67948e614d9b0c258dd (diff)
Add HIRAGANA ITERATION MARK to japanese-kana-table. (tiny change)
* lisp/language/japan-util.el (japanese-kana-table): Add an entry for HIRAGANA ITERATION MARK (U+309D). (japanese-alpha-numeric-table): Fix docstring.
-rw-r--r--lisp/language/japan-util.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index f0d817b8b5..939b70ab91 100644
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -57,6 +57,7 @@
(?$B$C(B ?$B%C(B ?(I/(B)
(?$B$c(B ?$B%c(B ?(I,(B) (?$B$e(B ?$B%e(B ?(I-(B) (?$B$g(B ?$B%g(B ?(I.(B)
(?$B$n(B ?$B%n(B "(I\(B")
+ (?$B!5(B ?$B!3(B) (?$B!6(B ?$B!4(B)
("$B$&!+(B" ?$B%t(B "(I3^(B") (nil ?$B%u(B "(I6(B") (nil ?$B%v(B "(I9(B"))
"Japanese JISX0208 Kana character table.
Each element is of the form (HIRAGANA KATAKANA HANKAKU-KATAKANA), where
@@ -146,7 +147,7 @@ and HANKAKU belongs to `japanese-jisx0201-kana'.")
(?$B#p(B . ?p) (?$B#q(B . ?q) (?$B#r(B . ?r) (?$B#s(B . ?s) (?$B#t(B . ?t)
(?$B#u(B . ?u) (?$B#v(B . ?v) (?$B#w(B . ?w) (?$B#x(B . ?x) (?$B#y(B . ?y) (?$B#z(B . ?z))
"Japanese JISX0208 alpha numeric character table.
-Each element is of the form (ALPHA-NUMERIC ASCII), where ALPHA-NUMERIC
+Each element is of the form (ALPHA-NUMERIC . ASCII), where ALPHA-NUMERIC
belongs to `japanese-jisx0208', ASCII belongs to `ascii'.")
;; Put properties 'jisx0208 and 'ascii to each Japanese alpha numeric