Use `=>decomposition@compat' instead of `=decomposition' for

compatibility decomposition mapping.

diff --git a/lisp/utf-2000/u00530-Armenian.el b/lisp/utf-2000/u00530-Armenian.el
index 7e32c58..4c4141c 100644 (file)
--- a/lisp/utf-2000/u00530-Armenian.el
+++ b/lisp/utf-2000/u00530-Armenian.el
@@ -889,7 +889,13 @@
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   compat #x0565 #x0582)
+    (=>decomposition@compat
+     ((name              . "ARMENIAN SMALL LETTER ECH")
+      (=ucs              . #x0565)     ; ե
+      )
+     ((name              . "ARMENIAN SMALL LETTER YIWN")
+      (=ucs              . #x0582)     ; ւ
+      ))
     (=ucs              . #x0587)       ; և
     ))
 (define-char

diff --git a/lisp/utf-2000/u00600-Arabic.el b/lisp/utf-2000/u00600-Arabic.el
index c420780..0def147 100644 (file)
--- a/lisp/utf-2000/u00600-Arabic.el
+++ b/lisp/utf-2000/u00600-Arabic.el
@@ -620,8 +620,7 @@
     (general-category  letter other) ; Informative Category
     (bidi-category     . "AL")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "ARABIC LETTER ALEF")
       (=ucs              . #x0627)     ; ا
       )
@@ -635,8 +634,7 @@
     (general-category  letter other) ; Informative Category
     (bidi-category     . "AL")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "ARABIC LETTER WAW")
       (=ucs              . #x0648)     ; و
       )
@@ -650,8 +648,7 @@
     (general-category  letter other) ; Informative Category
     (bidi-category     . "AL")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "ARABIC LETTER U")
       (=ucs              . #x06C7)     ; ۇ
       )
@@ -665,8 +662,7 @@
     (general-category  letter other) ; Informative Category
     (bidi-category     . "AL")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "ARABIC LETTER YEH")
       (=ucs              . #x064A)     ; ي
       )