Add comments of ku-ten for 94x94-sets.

[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 c201ca4..7a184d7 100644 (file)
--- a/lisp/utf-2000/u01F00-Greek-Extended.el
+++ b/lisp/utf-2000/u01F00-Greek-Extended.el
@@ -1,4 +1,4 @@
-;; -*- coding: utf-8-mcs -*-
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH PSILI")
     (general-category  letter lowercase) ; Normative Category
@@ -1202,8 +1202,8 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0251 #x0300)
-    (=ucs@jis          . #x1F70)       ; �����
-    (=jis-x0213-1-2000 . #x2B46)       ; �����
+    (=jis-x0213-1-2000 . #x2B46)       ; &JX1-2B46; [11-38]
+    (=ucs@jis          . #x1F70)       ; &JX1-2B46;
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ALPHA WITH OXIA")
@@ -1224,8 +1224,8 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0251 #x0301)
-    (=ucs@jis          . #x1F71)       ; �����
-    (=jis-x0213-1-2000 . #x2B47)       ; �����
+    (=jis-x0213-1-2000 . #x2B47)       ; &JX1-2B47; [11-39]
+    (=ucs@jis          . #x1F71)       ; &JX1-2B47;
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH VARIA")
@@ -1249,8 +1249,8 @@
     (->uppercase
      ((name              . "LATIN CAPITAL LETTER OPEN E WITH GRAVE")
       ))
-    (=ucs@jis          . #x1F72)       ; �����
-    (=jis-x0213-1-2000 . #x2B50)       ; �����
+    (=jis-x0213-1-2000 . #x2B50)       ; &JX1-2B50; [11-48]
+    (=ucs@jis          . #x1F72)       ; &JX1-2B50;
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER EPSILON WITH OXIA")
@@ -1274,8 +1274,8 @@
     (->uppercase
      ((name              . "LATIN CAPITAL LETTER OPEN E WITH ACUTE")
       ))
-    (=ucs@jis          . #x1F73)       ; �����
-    (=jis-x0213-1-2000 . #x2B51)       ; �����
+    (=jis-x0213-1-2000 . #x2B51)       ; &JX1-2B51; [11-49]
+    (=ucs@jis          . #x1F73)       ; &JX1-2B51;
     ))
 (define-char
   '((name              . "GREEK SMALL LETTER ETA WITH VARIA")