diff options
| author | Pavel Janík | 2001-12-18 21:30:27 +0000 |
|---|---|---|
| committer | Pavel Janík | 2001-12-18 21:30:27 +0000 |
| commit | a41deb9f14bc830372e2d22d38d7930e0e1cd53d (patch) | |
| tree | bf7ca79b180b6cbbe1263d9fa1a34b0e287b75ab | |
| parent | 6c78f23d22c5a553c82ccaa34ab3b1645b2916e0 (diff) | |
| download | emacs-a41deb9f14bc830372e2d22d38d7930e0e1cd53d.tar.gz emacs-a41deb9f14bc830372e2d22d38d7930e0e1cd53d.zip | |
(ethio-modify-vowel): Use char-to-string instead of
decompose-composite-char.
| -rw-r--r-- | lisp/language/ethio-util.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/language/ethio-util.el b/lisp/language/ethio-util.el index 68bfc7b1c9c..a173ddb3bee 100644 --- a/lisp/language/ethio-util.el +++ b/lisp/language/ethio-util.el | |||
| @@ -1294,7 +1294,7 @@ The markers \"<sera>\" and \"</sera>\" themselves are not deleted." | |||
| 1294 | (cond | 1294 | (cond |
| 1295 | ;; in case of gemination | 1295 | ;; in case of gemination |
| 1296 | ((eq (char-charset ch) 'composition) | 1296 | ((eq (char-charset ch) 'composition) |
| 1297 | (setq ch (string-to-char (decompose-composite-char ch)) | 1297 | (setq ch (string-to-char (char-to-string ch)) |
| 1298 | composite t)) | 1298 | composite t)) |
| 1299 | ;; neither gemination nor fidel | 1299 | ;; neither gemination nor fidel |
| 1300 | ((not (eq (char-charset ch) 'ethiopic)) | 1300 | ((not (eq (char-charset ch) 'ethiopic)) |