From 247ed98669e93c099a060821235ae3e1c07f6717 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 26 Aug 2009 23:08:50 +0000
Subject: [PATCH] Add `<=>jis-x0213-1' for each object of `<=>jis-x0208'.

---
 lisp/utf-2000/maps-conf.el |    7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lisp/utf-2000/maps-conf.el b/lisp/utf-2000/maps-conf.el
index 87c5f04..9795ea7 100644
--- a/lisp/utf-2000/maps-conf.el
+++ b/lisp/utf-2000/maps-conf.el
@@ -169,3 +169,10 @@
        (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)
-- 
1.7.10.4