X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Futf-2000%2Fu020A0-Currency-Symbols.el;h=3879647ebb26b0498875ad96311308f98ce40891;hp=830c76d4cee041a7e01e2c9f0eee2e5d9509b30b;hb=8446d9ddabcd222a62507fe60ffc05f092abad69;hpb=ed79ca47b430a917433a5f779c37c2f7c8ee11ba

diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
index 830c76d..3879647 100644
--- a/lisp/utf-2000/u020A0-Currency-Symbols.el
+++ b/lisp/utf-2000/u020A0-Currency-Symbols.el
@@ -60,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
@@ -68,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")