[Emacs-diffs] Changes to emacs/lisp/language/ethio-util.el

[Pavel Janík]

Index: emacs/lisp/language/ethio-util.el
diff -c emacs/lisp/language/ethio-util.el:1.26 
emacs/lisp/language/ethio-util.el:1.27
*** emacs/lisp/language/ethio-util.el:1.26      Mon Jul 16 08:22:59 2001
--- emacs/lisp/language/ethio-util.el   Tue Dec 18 16:30:27 2001
***************
*** 1294,1300 ****
      (cond
       ;; in case of gemination
       ((eq (char-charset ch) 'composition)
!       (setq ch (string-to-char (decompose-composite-char ch))
            composite t))
       ;; neither gemination nor fidel
       ((not (eq (char-charset ch) 'ethiopic))
--- 1294,1300 ----
      (cond
       ;; in case of gemination
       ((eq (char-charset ch) 'composition)
!       (setq ch (string-to-char (char-to-string ch))
            composite t))
       ;; neither gemination nor fidel
       ((not (eq (char-charset ch) 'ethiopic))