# HG changeset patch
# User Pavel Jan���k <Pavel@Janik.cz>
# Date 1008711027 0
# Node ID 2e75c71d9db1d90255c9d0e0f4a815d94454eaf8
# Parent  04d8f1b42babf79abfb711abb4c9aed89a426b0d
(ethio-modify-vowel): Use char-to-string instead of
decompose-composite-char.

diff -r 04d8f1b42bab -r 2e75c71d9db1 lisp/language/ethio-util.el
--- a/lisp/language/ethio-util.el	Tue Dec 18 21:14:36 2001 +0000
+++ b/lisp/language/ethio-util.el	Tue Dec 18 21:30:27 2001 +0000
@@ -1294,7 +1294,7 @@
     (cond
      ;; in case of gemination
      ((eq (char-charset ch) 'composition)
-      (setq ch (string-to-char (decompose-composite-char ch))
+      (setq ch (string-to-char (char-to-string ch))
 	    composite t))
      ;; neither gemination nor fidel
      ((not (eq (char-charset ch) 'ethiopic))