update.

[chise/xemacs-chise.git] / lisp / utf-2000 / u02000-General-Punctuation.el

diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el
index f00b3a3..47736ed 100644 (file)
--- a/lisp/utf-2000/u02000-General-Punctuation.el
+++ b/lisp/utf-2000/u02000-General-Punctuation.el
@@ -180,7 +180,7 @@
     ))
 (define-char
   '((name              . "HALFWIDTH HORIZONTAL BAR")
-    (->ucs             . #x2015)       ; ―
+    (=>ucs             . #x2015)       ; ―
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
@@ -333,7 +333,6 @@
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->decomposition   compat #x002E)
-    (chinese-big5      . #xA3BB)       ; �����
     (ucs               . #x2024)       ; ․
     ))
 (define-char
@@ -566,17 +565,29 @@
     (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)       ; �����
@@ -586,6 +597,16 @@
     (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")