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.

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index f0d817b8b5e263a5c4c212ef73b8aad89fa10570..939b70ab91120d06227a5c5f5b04aacbb491501c 100644 (file)
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -57,6 +57,7 @@
     (?\e$B$C\e(B ?\e$B%C\e(B ?\e(I/\e(B)
     (?\e$B$c\e(B ?\e$B%c\e(B ?\e(I,\e(B) (?\e$B$e\e(B ?\e$B%e\e(B ?\e(I-\e(B) (?\e$B$g\e(B ?\e$B%g\e(B ?\e(I.\e(B)
     (?\e$B$n\e(B ?\e$B%n\e(B "\e(I\\e(B")
+    (?\e$B!5\e(B ?\e$B!3\e(B) (?\e$B!6\e(B ?\e$B!4\e(B)
     ("\e$B$&!+\e(B" ?\e$B%t\e(B "\e(I3^\e(B") (nil ?\e$B%u\e(B "\e(I6\e(B") (nil ?\e$B%v\e(B "\e(I9\e(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'.")
     (?\e$B#p\e(B . ?p) (?\e$B#q\e(B . ?q) (?\e$B#r\e(B . ?r) (?\e$B#s\e(B . ?s) (?\e$B#t\e(B . ?t)
     (?\e$B#u\e(B . ?u) (?\e$B#v\e(B . ?v) (?\e$B#w\e(B . ?w) (?\e$B#x\e(B . ?x) (?\e$B#y\e(B . ?y) (?\e$B#z\e(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