Add `<=>jis-x0213-1' for each object of `<=>jis-x0208'.
authortomo <tomo>
Wed, 26 Aug 2009 23:08:50 +0000 (23:08 +0000)
committertomo <tomo>
Wed, 26 Aug 2009 23:08:50 +0000 (23:08 +0000)
lisp/utf-2000/maps-conf.el

index 87c5f04..9795ea7 100644 (file)
        (put-char-attribute c '=jis-x0213-1 v))
      nil)
    ccs))
+
+(map-char-attribute
+ (lambda (c v)
+   (unless (eq (encode-char c '<=>jis-x0213-1) v)
+     (put-char-attribute c '<=>jis-x0213-1 v))
+   nil)
+ '<=>jis-x0208)