X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu020A0-Currency-Symbols.el;h=780766559a8aea249867d8577d7ce6f8e8ee29a4;hb=06edd89cb9c76758032120a125b6fce99f6a38c9;hp=35d10e5ffe2608d6b17274c2b0e4fe4a00e90408;hpb=0c97e3e54fe4479c7844b0ecfafc65c7b6102a27;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
index 35d10e5..7807665 100644
--- a/lisp/utf-2000/u020A0-Currency-Symbols.el
+++ b/lisp/utf-2000/u020A0-Currency-Symbols.el
@@ -74,11 +74,11 @@
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (=ucs		. #x20A9)	; ₩
     (->fullwidth
      ((name		  . "FULLWIDTH WON SIGN")
       (=ucs		  . #xFFE6)	; ￦
       ))
-    (=ucs		. #x20A9)	; ₩
     ))
 (define-char
   '((name		. "NEW SHEQEL SIGN")
@@ -100,8 +100,19 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (=ucs		. #x20AC)	; €
-    (=jis-x0213-1-2000	. #x2921)	; &I-JX1-2921; [09-01]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "EURO SIGN")
+      (=ucs		  . #x20AC)	; €
+      ))
+    (=ucs@jis		. #x20AC)	; &JX1-2921;
+    (=jis-x0213-1	. #x2921)	; &JX1-2921; [09-01]
     (=big5		. #xA3E1)	; &I-B-A3E1;
+    (<-fullwidth
+     ((name		  . "EURO SIGN")
+      (=ucs		  . #x20AC)	; €
+      ))
     ))
 (define-char
   '((name		. "KIP SIGN")