Mercurial > emacs

changeset 18304:58b39b4108d5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Set syntaxes of Ethiopic characters.
author Kenichi Handa <handa@m17n.org>
date Wed, 18 Jun 1997 12:55:57 +0000
parents 8d8d4aa12426
children 21855271c115
files lisp/international/characters.el
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/characters.el	Wed Jun 18 12:55:15 1997 +0000
+++ b/lisp/international/characters.el	Wed Jun 18 12:55:57 1997 +0000
@@ -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)