(ONE DOT LEADER): Delete Big5-A3BB.
authortomo <tomo>
Fri, 27 Jul 2001 19:06:02 +0000 (19:06 +0000)
committertomo <tomo>
Fri, 27 Jul 2001 19:06:02 +0000 (19:06 +0000)
(OVERLINE): Add `->fullwidth'.
(FULLWIDTH OVERLINE): Add `<-fullwidth'.
(heavy overline): New character; unify C1-2224 and Big5-A1C3.
- Use `=>ucs' instead of `->ucs'.

lisp/utf-2000/u02000-General-Punctuation.el

index f00b3a3..47736ed 100644 (file)
     ))
 (define-char
   '((name              . "HALFWIDTH HORIZONTAL BAR")
-    (->ucs             . #x2015)       ; ―
+    (=>ucs             . #x2015)       ; ―
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->decomposition   compat #x002E)
-    (chinese-big5      . #xA3BB)       ; 
     (ucs               . #x2024)       ; ․
     ))
 (define-char
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->decomposition   compat #x0020 #x0305)
+    (->fullwidth
+     ((name              . "FULLWIDTH OVERLINE")
+      (japanese-jisx0208-1978    . #x2131)     ; 
+      (chinese-gb2312            . #x237E)     ; 
+      (japanese-jisx0208         . #x2131)     ; 
+      (korean-ksc5601            . #x237E)     ; 
+      (chinese-cns11643-1        . #x2223)     ; 
+      ))
     (latin-jisx0201    . #x7E) ; 
     (hebrew-iso8859-8  . #xAF) ; 
     (ucs               . #x203E)       ; ‾
     ))
 (define-char
   '((name              . "FULLWIDTH OVERLINE")
-    (->ucs             . #x203E)       ; ‾
+    (=>ucs             . #x203E)       ; ‾
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->decomposition   wide #x203E)
+    (<-fullwidth
+     ((name              . "OVERLINE")
+      (ucs               . #x203E)     ; ‾
+      ))
     (japanese-jisx0208-1978    . #x2131)       ; 
     (chinese-gb2312            . #x237E)       ; 
     (japanese-jisx0208         . #x2131)       ; 
     (chinese-big5              . #xA1C2)       ; 
     ))
 (define-char
+  '((name              . "heavy overline")
+    (=>ucs             . #x203E)       ; ‾
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-cns11643-1 . #x2224)      ; 
+    (chinese-big5      . #xA1C3)       ; 
+    (ucs-big5          . #xFFE3)       ; 
+    ))
+(define-char
   '((name              . "UNDERTIE")
     (general-category  punctuation connector) ; Informative Category
     (bidi-category     . "ON")