projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(U+8806): Use `->denotational' instead of `->subsumptive'.
[chise/xemacs-chise.git-]
/
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
830c76d
..
7807665
100644
(file)
--- 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)
(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
(=ucs . #x20A8) ; ₨
))
(define-char
@@
-68,11
+74,11
@@
(general-category symbol currency) ; Informative Category
(bidi-category . "ET")
(mirrored . nil)
(general-category symbol currency) ; Informative Category
(bidi-category . "ET")
(mirrored . nil)
+ (=ucs . #x20A9) ; ₩
(->fullwidth
((name . "FULLWIDTH WON SIGN")
(=ucs . #xFFE6) ; ₩
))
(->fullwidth
((name . "FULLWIDTH WON SIGN")
(=ucs . #xFFE6) ; ₩
))
- (=ucs . #x20A9) ; ₩
))
(define-char
'((name . "NEW SHEQEL SIGN")
))
(define-char
'((name . "NEW SHEQEL SIGN")
@@
-94,8
+100,19
@@
(bidi-category . "ET")
(mirrored . nil)
(=ucs . #x20AC) ; €
(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;
(=big5 . #xA3E1) ; &I-B-A3E1;
+ (<-fullwidth
+ ((name . "EURO SIGN")
+ (=ucs . #x20AC) ; €
+ ))
))
(define-char
'((name . "KIP SIGN")
))
(define-char
'((name . "KIP SIGN")