X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu020A0-Currency-Symbols.el;h=097fc76d1ba7bde331de0816eec29bb82bffd673;hb=f18413f46f6136f93b0b73839baca923caa33671;hp=a4f9a481d5c01fd90cc5bbb7190ddc524a28e2ee;hpb=153e3b036553abb2028faff67f80c923555028b7;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
index a4f9a48..097fc76 100644
--- a/lisp/utf-2000/u020A0-Currency-Symbols.el
+++ b/lisp/utf-2000/u020A0-Currency-Symbols.el
@@ -1,114 +1,119 @@
 (define-char
   '((name		. "EURO-CURRENCY SIGN")
-    (ucs		. #x20A0)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A0)	; ₠
     ))
 (define-char
   '((name		. "COLON SIGN")
-    (ucs		. #x20A1)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A1)	; ₡
     ))
 (define-char
   '((name		. "CRUZEIRO SIGN")
-    (ucs		. #x20A2)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A2)	; ₢
     ))
 (define-char
   '((name		. "FRENCH FRANC SIGN")
-    (ucs		. #x20A3)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A3)	; ₣
     ))
 (define-char
   '((name		. "LIRA SIGN")
-    (ucs		. #x20A4)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A4)	; ₤
     ))
 (define-char
   '((name		. "MILL SIGN")
-    (ucs		. #x20A5)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A5)	; ₥
     ))
 (define-char
   '((name		. "NAIRA SIGN")
-    (ucs		. #x20A6)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A6)	; ₦
     ))
 (define-char
   '((name		. "PESETA SIGN")
-    (ucs		. #x20A7)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20A7)	; ₧
     ))
 (define-char
   '((name		. "RUPEE SIGN")
-    (ucs		. #x20A8)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
     (->decomposition	compat #x0052 #x0073)
+    (ucs		. #x20A8)	; ₨
     ))
 (define-char
   '((name		. "WON SIGN")
-    (ucs		. #x20A9)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (->fullwidth
+     ((name		  . "FULLWIDTH WON SIGN")
+      (ucs		  . #xFFE6)	; ￦
+      ))
+    (ucs		. #x20A9)	; ₩
     ))
 (define-char
   '((name		. "NEW SHEQEL SIGN")
-    (ucs		. #x20AA)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20AA)	; ₪
     ))
 (define-char
   '((name		. "DONG SIGN")
-    (ucs		. #x20AB)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20AB)	; ₫
     ))
 (define-char
   '((name		. "EURO SIGN")
-    (ucs		. #x20AC)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (japanese-jisx0213-1	#x29 #x21)	; €
+    (japanese-jisx0213-1	. #x2921)	; ø»¢ž¬
+    (chinese-big5		. #xA3E1)	; øºŸ¡¹
+    (ucs			. #x20AC)	; €
     ))
 (define-char
   '((name		. "KIP SIGN")
-    (ucs		. #x20AD)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20AD)	; ₭
     ))
 (define-char
   '((name		. "TUGRIK SIGN")
-    (ucs		. #x20AE)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20AE)	; ₮
     ))
 (define-char
   '((name		. "DRACHMA SIGN")
-    (ucs		. #x20AF)
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x20AF)	; ₯
     ))