Reformatted.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u020A0-Currency-Symbols.el

diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
index 0454f17..3879647 100644 (file)
--- a/lisp/utf-2000/u020A0-Currency-Symbols.el
+++ b/lisp/utf-2000/u020A0-Currency-Symbols.el
@@ -1,3 +1,4 @@
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name              . "EURO-CURRENCY SIGN")
     (general-category  symbol currency) ; Informative Category
@@ -59,7 +60,13 @@
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   compat #x0052 #x0073)
+    (=>decomposition@compat
+     ((name              . "LATIN CAPITAL LETTER R")
+      (=ucs              . #x0052)     ; R
+      )
+     ((name              . "LATIN SMALL LETTER S")
+      (=ucs              . #x0073)     ; s
+      ))
     (=ucs              . #x20A8)       ; ₨
     ))
 (define-char
@@ -67,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")
@@ -92,9 +99,9 @@
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (=jis-x0213-1-2000 . #x2921)       ; �����
-    (=big5             . #xA3E1)       ; ������
     (=ucs              . #x20AC)       ; €
+    (=jis-x0213-1-2000 . #x2921)       ; &I-JX1-2921; [09-01]
+    (=big5             . #xA3E1)       ; &I-B-A3E1;
     ))
 (define-char
   '((name              . "KIP SIGN")