# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1007747540 0
# Node ID f3bc5e440020e4837744b1be02ab5330d616ff80
# Parent  2c26c03652ebe9db3f0bb31e42ed5952f7c34869
Resurrect the Hebrew category
settings for all Hebrew characters removed by the last change.
Add code for setting the Hebrew category of the Unicode Hebrew
characters.  Set syntax entries for Hebrew punctuation characters.

diff -r 2c26c03652eb -r f3bc5e440020 lisp/international/characters.el
--- a/lisp/international/characters.el	Fri Dec 07 17:41:24 2001 +0000
+++ b/lisp/international/characters.el	Fri Dec 07 17:52:20 2001 +0000
@@ -468,7 +468,19 @@
 
 ;; Hebrew character set (ISO-8859-8)
 
-;; (modify-category-entry (make-char 'hebrew-iso8859-8) ?w)
+(modify-category-entry (make-char 'hebrew-iso8859-8) ?w)
+(let ((c #x591))
+  (while (<= c #x5f4)
+    (modify-category-entry (decode-char 'ucs c) ?w)
+    (setq c (1+ c))))
+
+(modify-syntax-entry (make-char 'hebrew-iso8859-8 208) ".") ; PASEQ
+(modify-syntax-entry (make-char 'hebrew-iso8859-8 211) ".") ; SOF PASUQ
+(modify-syntax-entry (decode-char 'ucs #x5be) ".") ; MAQAF
+(modify-syntax-entry (decode-char 'ucs #x5c0) ".") ; PASEQ
+(modify-syntax-entry (decode-char 'ucs #x5c3) ".") ; SOF PASUQ
+(modify-syntax-entry (decode-char 'ucs #x5f3) ".") ; GERESH
+(modify-syntax-entry (decode-char 'ucs #x5f4) ".") ; GERSHAYIM
 
 ;; (let ((c 224))
 ;;   (while (< c 251)