Add `=ucs@big5' features.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u01F00-Greek-Extended.el

diff --git a/lisp/utf-2000/u01F00-Greek-Extended.el b/lisp/utf-2000/u01F00-Greek-Extended.el
index 4a4c44a..1851887 100644 (file)
--- a/lisp/utf-2000/u01F00-Greek-Extended.el
+++ b/lisp/utf-2000/u01F00-Greek-Extended.el
@@ -1,3 +1,4 @@
+;; -*- coding: utf-8-mcs -*-
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH PSILI")
     (general-category  letter lowercase) ; Normative Category
@@ -1202,7 +1203,7 @@
     (mirrored          . nil)
     (->decomposition   #x0251 #x0300)
     (=jis-x0213-1-2000 . #x2B46)       ; �����
-    (ucs-jis           . #x1F70)       ; �����
+    (=ucs@jis          . #x1F70)       ; �����
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH OXIA")
@@ -1224,7 +1225,7 @@
     (mirrored          . nil)
     (->decomposition   #x0251 #x0301)
     (=jis-x0213-1-2000 . #x2B47)       ; �����
-    (ucs-jis           . #x1F71)       ; �����
+    (=ucs@jis          . #x1F71)       ; �����
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH VARIA")
@@ -1249,7 +1250,7 @@
      ((name              . "LATIN CAPITAL LETTER OPEN E WITH GRAVE")
       ))
     (=jis-x0213-1-2000 . #x2B50)       ; �����
-    (ucs-jis           . #x1F72)       ; �����
+    (=ucs@jis          . #x1F72)       ; �����
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH OXIA")
@@ -1274,7 +1275,7 @@
      ((name              . "LATIN CAPITAL LETTER OPEN E WITH ACUTE")
       ))
     (=jis-x0213-1-2000 . #x2B51)       ; �����
-    (ucs-jis           . #x1F73)       ; �����
+    (=ucs@jis          . #x1F73)       ; �����
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ETA WITH VARIA")