(char-db-update-comment): Use mapping-table for `japanese-jisx0213-*'.
authortomo <tomo>
Sun, 21 Nov 1999 07:50:47 +0000 (07:50 +0000)
committertomo <tomo>
Sun, 21 Nov 1999 07:50:47 +0000 (07:50 +0000)
lisp/utf-2000/char-db-util.el

index b5539d3..94e2a3b 100644 (file)
                     (not (eq (car cdef) 'ideograph-daikanwa))
                     (or (memq (car cdef) '(ascii latin-viscii-upper
                                                  latin-viscii-lower
-                                                 arabic-iso8859-6))
+                                                 arabic-iso8859-6
+                                                 japanese-jisx0213-1
+                                                 japanese-jisx0213-2))
                         (= (char-int (charset-iso-final-char (car cdef)))
                            0)))
                    (apply (function make-char) cdef)