From c23d387243dc4818198fc405373c4c9b8e4a3d19 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Wed, 18 Jun 1997 12:55:57 +0000
Subject: [PATCH] Set syntaxes of Ethiopic characters.

---
 lisp/international/characters.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 4820d910e73..087b0ff92fc 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -221,6 +221,11 @@
 ;; Ethiopic character set
 
 (modify-category-entry (make-char 'ethiopic) ?e)
+(modify-syntax-entry (make-char 'ethiopic) "w")
+(let ((chars '(?$(3$h(B ?$(3$i(B ?$(3$j(B ?$(3$k(B ?$(3$l(B ?$(3$m(B ?$(3$n(B ?$(3$o(B ?$(3%i(B ?$(3%t(B ?$(3%u(B ?$(3%v(B ?$(3%w(B ?$(3%x(B)))
+  (while chars
+    (modify-syntax-entry (car chars) ".")
+    (setq chars (cdr chars))))
 
 ;; European character set (Latin-1,2,3,4,5)
 
-- 
2.39.5