Initial revision

diff --git a/leim/quail/hebrew.el b/leim/quail/hebrew.el
new file mode 100644 (file)
index 0000000..c7a998d
--- /dev/null
+++ b/leim/quail/hebrew.el
@@ -0,0 +1,73 @@
+;; Quail package for inputting Hebrew characters.
+
+;; Copyright (C) 1998 Electrotechnical Laboratory, JAPAN.
+;; Licensed to the Free Software Foundation.
+
+;; Keywords: mule, input method, Hebrew
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 2, or (at your option)
+;; any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
+
+(require 'quail)
+
+(quail-define-package
+ "hebrew" "Hebrew" "\e,Hr\e(B" nil "Hebrew (ISO 8859-8) input method.
+
+Based on Hebrew typewriter keys.
+Hebrew letters are assigned to lowercases.
+" nil t t t t nil nil nil nil nil t)
+
+;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) _- += ~;
+;;   /Q 'W \e,Hw\e(BE \e,Hx\e(BR \e,H`\e(BT \e,Hh\e(BY \e,He\e(BU \e,Ho\e(BI \e,Hm\e(BO \e,Ht\e(BP {[ {]
+;;    \e,Hy\e(BA \e,Hc\e(BS \e,Hb\e(BD \e,Hk\e(BF \e,Hr\e(BG \e,Hi\e(BH \e,Hg\e(BJ \e,Hl\e(BK \e,Hj\e(BL :\e,Hs\e(B ", |\
+;;     \e,Hf\e(BZ \e,Hq\e(BX \e,Ha\e(BC \e,Hd\e(BV \e,Hp\e(BB \e,Hn\e(BN \e,Hv\e(BM <\e,Hz\e(B >\e,Hu\e(B ?.
+;;                      
+
+(quail-define-rules
+ ("`" ?\;)
+ ("q" ?/)
+ ("w" ?')
+ ("e" ?\e,Hw\e(B)
+ ("r" ?\e,Hx\e(B)
+ ("t" ?\e,H`\e(B)
+ ("y" ?\e,Hh\e(B)
+ ("u" ?\e,He\e(B)
+ ("i" ?\e,Ho\e(B)
+ ("o" ?\e,Hm\e(B)
+ ("p" ?\e,Ht\e(B)
+ ("a" ?\e,Hy\e(B)
+ ("s" ?\e,Hc\e(B)
+ ("d" ?\e,Hb\e(B)
+ ("f" ?\e,Hk\e(B)
+ ("g" ?\e,Hr\e(B)
+ ("h" ?\e,Hi\e(B)
+ ("j" ?\e,Hg\e(B)
+ ("k" ?\e,Hl\e(B)
+ ("l" ?\e,Hj\e(B)
+ (";" ?\e,Hs\e(B)
+ ("z" ?\e,Hf\e(B)
+ ("x" ?\e,Hq\e(B)
+ ("c" ?\e,Ha\e(B)
+ ("v" ?\e,Hd\e(B)
+ ("b" ?\e,Hp\e(B)
+ ("n" ?\e,Hn\e(B)
+ ("m" ?\e,Hv\e(B)
+ ("," ?\e,Hz\e(B)
+ ("." ?\e,Hu\e(B)
+ ("/" ?.)
+ ("'" ?,)
+ )