Thank you Uwe, I apologise that I didn’t get to it sooner!
APPROVE COMMIT
NOTE: This patch has been committed.
# HG changeset patch
# User Aidan Kehoe <kehoea(a)parhasard.net>
# Date 1390303635 -7200
#      Tue Jan 21 13:27:15 2014 +0200
# Node ID 3e31b3d13c100a9bae06a7feead54480dd8a8e84
# Parent  72865092f02b13aced9cd49b5fd2297d2b0a5b27
Import GNU's Hebrew input methods, thank you Uwe Brauer!
leim/ChangeLog addition:
2014-01-21  Aidan Kehoe  <kehoea(a)parhasard.net>
	Import GNU's Hebrew input methods, thank you GNU, thank you Uwe
	Brauer!
	* leim-list.el:
	Make the Hebrew input methods available here.
	* Makefile:
	* Makefile (EXTRA_SOURCES):
	Install hebrew.el uncompiled, since it's not computationally
	intensive (compiling it doesn't bring much) and 21.4, which
	compiles the packages, chokes on it.
	* quail/hebrew.el:
	* quail/hebrew.el ("hebrew"):
	Update.
	* quail/hebrew.el ("hebrew-new"): New.
	* quail/hebrew.el ("hebrew-lyx"): New.
	* quail/hebrew.el ("hebrew-full"): New.
	* quail/hebrew.el ("hebrew-biblical-tiro"): New.
	* quail/hebrew.el ("hebrew-biblical-sil"): New.
	* quail/hebrew.el ("yiddish-royal"): New.
	* quail/hebrew.el ("yiddish-keyman"): New.
	* quail/hebrew.el ("hebrew-phonetic-xkb"): New.
	* quail/hebrew.el ("hebrew-phonetic-qwerty"): New.
diff -r 72865092f02b -r 3e31b3d13c10 ChangeLog
--- a/ChangeLog	Mon Sep 02 14:45:38 2013 +0200
+++ b/ChangeLog	Tue Jan 21 13:27:15 2014 +0200
@@ -1,3 +1,29 @@
+2014-01-21  Aidan Kehoe  <kehoea(a)parhasard.net>
+
+	Import GNU's Hebrew input methods, thank you GNU, thank you Uwe
+	Brauer!
+
+	* leim-list.el:
+	Make the Hebrew input methods available here.
+	* Makefile:
+	* Makefile (EXTRA_SOURCES):
+	Install hebrew.el uncompiled, since it's not computationally
+	intensive (compiling it doesn't bring much) and 21.4, which
+	compiles the packages, chokes on it.
+
+	* quail/hebrew.el:
+	* quail/hebrew.el ("hebrew"):
+	Update.
+	* quail/hebrew.el ("hebrew-new"): New.
+	* quail/hebrew.el ("hebrew-lyx"): New.
+	* quail/hebrew.el ("hebrew-full"): New.
+	* quail/hebrew.el ("hebrew-biblical-tiro"): New.
+	* quail/hebrew.el ("hebrew-biblical-sil"): New.
+	* quail/hebrew.el ("yiddish-royal"): New.
+	* quail/hebrew.el ("yiddish-keyman"): New.
+	* quail/hebrew.el ("hebrew-phonetic-xkb"): New.
+	* quail/hebrew.el ("hebrew-phonetic-qwerty"): New.
+
 2013-09-02  Norbert Koch  <viteno(a)xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.34 released.
diff -r 72865092f02b -r 3e31b3d13c10 Makefile
--- a/Makefile	Mon Sep 02 14:45:38 2013 +0200
+++ b/Makefile	Tue Jan 21 13:27:15 2014 +0200
@@ -52,8 +52,9 @@
 
 # #### Move these to ELCS_1 once 21.4 is deprecated.
 
-EXTRA_SOURCES= quail/cyrillic-tajik.el quail/georgian.el quail/ipa-21.5.el \
-	quail/latin-ltx.el quail/rfc1345.el quail/sgml-input.el quail/welsh.el
+EXTRA_SOURCES= quail/cyrillic-tajik.el quail/georgian.el quail/hebrew.el \
+	quail/ipa-21.5.el quail/latin-ltx.el quail/rfc1345.el \
+	quail/sgml-input.el quail/welsh.el
 
 ELCS_1_FILES = $(ELCS_1) $(ELCS_1:.elc=.el)
 ELCS_1_DEST = $(PACKAGE)/quail
diff -r 72865092f02b -r 3e31b3d13c10 leim-list.el
--- a/leim-list.el	Mon Sep 02 14:45:38 2013 +0200
+++ b/leim-list.el	Tue Jan 21 13:27:15 2014 +0200
@@ -610,3 +610,56 @@
  "croatian" "Croatian" 'quail-use-package
  "HR" "\"Standard\" Croatian keyboard."
  "quail/croatian")
+(when (and (fboundp 'decode-char) (decode-char 'ucs #x31C)
+           (eq #x31C (encode-char (decode-char 'ucs #x31C) 'ucs)))
+  (register-input-method
+   "hebrew" "Hebrew" 'quail-use-package
+   "[2],Hr[0](B" "Hebrew SI-1452 input method. Only Hebrew-related
characters are considered."
+   "quail/hebrew")
+  (register-input-method
+   "hebrew-new" "Hebrew" 'quail-use-package
+  "[2],Hr[0](B"  "Hebrew SI-1452 new draft input method."
+   "quail/hebrew")
+  (register-input-method
+   "hebrew-lyx" "Hebrew" 'quail-use-package
+   (decode-coding-string  "\xd7\x9c\xd6\xb4" 'utf-8)
+   "Hebrew LyX input method. Based on LyX keyboard layout.
+  Additional mappings for Rafe and Yiddish ligatures."
+   "quail/hebrew")
+  (register-input-method
+   "hebrew-full" "Hebrew" 'quail-use-package
+   (decode-coding-string "\xd7\xa2\xd6\xb4\xd6\xab" 'utf-8)
+   "Hebrew Full method. Provides access to all Hebrew characters suitable to Modern
Hebrew.")
+  (register-input-method
+   "hebrew-biblical-tiro" "Hebrew" 'quail-use-package
+   (decode-coding-string "\xd7\xaa\xd6\xb4\xd7\xa8\xd6\xb9" 'utf-8)
+   "Biblical Hebrew Tiro input method. Based on Society of Biblical Literature's
Tiro \
+keyboard layout.
+Not suitable for modern Hebrew input.")
+  (register-input-method
+   "hebrew-biblical-sil" "Hebrew" 'quail-use-package
+   (decode-coding-string "\xd7\xa1\xd6\xb4\xd7\x9c" 'utf-8)
+   "Biblical Hebrew SIL input method.
+Based on Society of Biblical Literature's SIL keyboard layout.
+Phonetic and not suitable for modern Hebrew input.")
+  (register-input-method
+   "yiddish-royal" "Hebrew" 'quail-use-package
(decode-coding-string "\xd7\xb2\xd7\xa8" 'utf-8)
+   "Yiddish Royal input method. Based on Royal Yiddish typewriter.
+Better for Yiddish than Hebrew methods.")
+  (register-input-method
+   "yiddish-keyman" "Hebrew" 'quail-use-package
(decode-coding-string "\xd7\xb2\xd7\xa7" 'utf-8)
+   "Yiddish Keyman input method. Based on Keyman keyboard layout.
+Better for Yiddish than Hebrew methods.")
+  (register-input-method
+   "hebrew-phonetic-xkb" "Hebrew" 'quail-use-package
"[2],Ht[0](B" 
+   "Hebrew phonetic (XKB) input method. Based on the XKB hebrew-phonetic
+keyboard layout, layout that attempts to match Hebrew letters to
+English phonetic equivalents, some of its chars however are mapped
+according to their shape, as o--> samesh.")
+  (register-input-method 
+   "hebrew-phonetic-qwerty" "Hebrew" "[2],Hs[0](B"
'quail-use-package 
+  "Hebrew phonetic input method. Based on the KDE hebrew-phonetic keyboard layout,
+layout that attempts to match Hebrew letters to English phonetic equivalents.
+It is however modified, c=chet x zadik, o=wav y=ain e=aleph.
+Moreover some but not all niqqud are added."))
+  
diff -r 72865092f02b -r 3e31b3d13c10 quail/hebrew.el
--- a/quail/hebrew.el	Mon Sep 02 14:45:38 2013 +0200
+++ b/quail/hebrew.el	Tue Jan 21 13:27:15 2014 +0200
@@ -1,8 +1,5 @@
-;;; hebrew.el --- Quail package for inputting Hebrew characters  -*-coding: iso-8859-8
-*-
+;; hebrew.el --- Quail package for inputting Hebrew characters  -*-coding: utf-8;-*-
 
-;; Copyright (C) 1999
-;;   National Institute of Advanced Industrial Science and Technology (AIST)
-;;   Registration Number H14PRO021
 
 ;; Keywords: mule, input method, Hebrew
 
@@ -27,59 +24,1025 @@
 
 ;;; Commentary:
 
-;;; XEmacs change; encode the file as ISO-8859-8, which is compatible
-;;; with 21.4. 
+;;; XEmacs change; encode the file as utf-8, given that iso-8859-8 doesn't
+;;; support niqqud and that the version of iso-2022-7bit supported by 21.4
+;;; doesn't support them either. Thank you Uwe Brauer.
 
 ;;; Code:
 
 (require 'quail)
+(quail-define-package
+ "hebrew" "Hebrew" "ע" nil "Hebrew SI-1452 input
method.
 
-(quail-define-package
- "hebrew" "Hebrew" "�" nil "Hebrew (ISO 8859-8) input
method.
-
-Based on Hebrew typewriter keys.
-Hebrew letters are assigned to lowercases.
+Based on SI-1452 keyboard layout.
+Only Hebrew-related characters are considered.
+ 'q' is used to switch levels instead of Alt-Gr.
+ Maqaaf (־) is mapped to '/פ'.
 " nil t t t t nil nil nil nil nil t)
 
-;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ ;~
-;;   /Q 'W �E �R �T �Y �U �I �O �P [{ ]}
-;;    �A �S �D �F �G �H �J �K �L �: ," \|
-;;     �Z �X �C �V �B �N �M �< �> .?
-;;
-
 (quail-define-rules
  ("`" ?\;)
+ ("w" ?\')
+ ("e" ?ק)  ; Qof
+ ("r" ?ר)  ; Resh
+ ("t" ?א)  ; Alef
+ ("y" ?ט)  ; Tet
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?י)  ; Yod
+ ("j" ?ח)  ; Het
+ ("k" ?ל)  ; Lamed
+ ("l" ?ך)  ; Final Kaf
+ (";" ?ף)  ; Final Pe
+ ("'" ?,)
+ ("z" ?ז)  ; Zayin
+ ("x" ?ס)  ; Samekh
+ ("c" ?ב)  ; Bet
+ ("v" ?ה)  ; He
+ ("b" ?נ)  ; Nun
+ ("n" ?מ)  ; Mem
+ ("m" ?צ)  ; Tsadi
+ ("," ?ת)  ; Tav
+ ("." ?ץ)  ; Final Tsadi
+ ("/" ?.)  ; Stop
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+ ("q`" ?ְ)  ; Sheva
+ ("q1" ?ֱ)  ; Hataf Segol
+ ("q2" ?ֲ)  ; Hataf Patah
+ ("q3" ?ֳ)  ; Hataf Qamats
+ ("q4" ?ִ)  ; Hiriq
+ ("q5" ?ֵ)  ; Tsere
+ ("q6" ?ֶ)  ; Segol (Point)
+ ("q7" ?ַ)  ; Patah
+ ("q8" ?ָ)  ; Qamats
+ ("q9" ?ׂ)  ; Sin dot שׁ
+ ("q0" ?ׁ)  ; Shin dot
+ ("q-" ?ֹ)  ; Holam
+ ("q=" ?ּ)  ; Dagesh or Mapiq
+ ("q\\" ?ֻ)  ; Qubuts
+ ("qq" ?/)
+ ("qw" ?׳)  ; Geresh (Punct.)
+ ("qi" ?װ)  ; Yiddish Double Vav
+ ("qp" ?־)  ; Maqaf
+ ("q[" ?ֿ)  ; Rafe
+ ("q]" ?ֽ)  ; Meteg
+ ("qa" ?₪)  ; New Sheqel sign
+ ("qh" ?ײ)  ; Yiddish Double Yod
+ ("qj" ?ױ)  ; Yiddish Vav Yod
+ ("q\"" ?״)  ; Gershayim (Punct.)
+ ("q," ?\u200E)  ;  LRM
+ ("q." ?\u200F)  ;  RLM
+)
+
+(quail-define-package
+ "hebrew-new" "Hebrew" "ע" nil "Hebrew SI-1452 new
draft input method.
+
+Based on latest draft of SI-1452 keyboard layout.
+Only Hebrew-related characters are considered.
+ '`' is used to switch levels instead of Alt-Gr.
+Geresh is mapped to '`k'.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
  ("q" ?/)
+ ("w" ?\')
+ ("e" ?ק)  ; Qof
+ ("r" ?ר)  ; Resh
+ ("t" ?א)  ; Alef
+ ("y" ?ט)  ; Tet
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?י)  ; Yod
+ ("j" ?ח)  ; Het
+ ("k" ?ל)  ; Lamed
+ ("l" ?ך)  ; Final Kaf
+ (";" ?ף)  ; Final Pe
+ ("'" ?,)
+ ("z" ?ז)  ; Zayin
+ ("x" ?ס)  ; Samekh
+ ("c" ?ב)  ; Bet
+ ("v" ?ה)  ; He
+ ("b" ?נ)  ; Nun
+ ("n" ?מ)  ; Mem
+ ("m" ?צ)  ; Tsadi
+ ("," ?ת)  ; Tav
+ ("." ?ץ)  ; Final Tsadi
+ ("/" ?.)  ; Stop
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+
+ ("``" ?\;)
+ ("`1" ?ֽ)  ; Meteg
+;("`2" ??)  ; Unassigned
+ ("`3" ?€)  ; Euro Sign
+ ("`4" ?₪)  ; New Sheqel sign
+ ("`5" ?°)  ; Degree Sign
+ ("`6" ?֫)  ; Ole
+;("`7" ??)  ; Unassigned
+ ("`8" ?×)  ; Multiplication Sign
+ ("`9" ?\u200E)  ; LRM
+ ("`0" ?\u200F)  ; RLM
+ ("`-" ?־)  ; Maqaf
+ ("`=" ?–)  ; En Dash
+ ("`q" ?ׂ)  ; Sin dot
+ ("`w" ?ׁ)  ; Shin dot
+ ("`e" ?ָ)  ; Qamats
+ ("`r" ?ֳ)  ; Hataf Qamats
+;("`t" ??)  ; Unassigned
+ ("`y" ?װ)  ; Yiddish Double Vav
+ ("`u" ?ֹ)  ; Holam
+;("`i" ??)  ; Unassigned
+;("`o" ??)  ; Unassigned
+ ("`p" ?ַ)  ; Patah
+ ("`[" ?ֲ)  ; Hataf Patah
+ ("`]" ?ֿ)  ; Rafe
+ ("`\\" ?ֻ)  ; Qubuts
+ ("`a" ?ְ)  ; Sheva
+ ("`s" ?ּ)  ; Dagesh or Mapiq
+;("`d" ??)  ; Unassigned
+;("`f" ??)  ; Unassigned
+ ("`g" ?ױ)  ; Yiddish Vav Yod
+ ("`h" ?ײ)  ; Yiddish Double Yod
+ ("`j" ?ִ)  ; Hiriq
+ ("`k" ?׳)  ; Geresh (Punct.)
+ ("`l" ?“)  ; Left Double Quotation Mark
+ ("`;" ?”)  ; Right Double Quotation Mark
+ ("`'" ?״)  ; Gershayim (Punct.)
+;("`z" ??)  ; Unassigned
+ ("`x" ?ֶ)  ; Segol (Point)
+ ("`c" ?ֱ)  ; Hataf Segol
+;("`v" ??)  ; Unassigned
+;("`b" ??)  ; Unassigned
+;("`n" ??)  ; Unassigned
+ ("`m" ?ֵ)  ; Tsere
+;("`," ??)  ; Unassigned
+;("`." ??)  ; Unassigned
+ ("`/" ?÷)  ; Division Sign
+
+ ("``" ?׃)  ; Sof Pasuq
+ ("`!" ?֑)  ; Etnahta
+ ("`@" ?֒)  ; Segol (Accent)
+ ("`#" ?֓)  ; Shalshelet
+ ("`$" ?֔)  ; Zaqef Qatan
+ ("`%" ?֕)  ; Zaqef Gadol
+ ("`^" ?֖)  ; Tipeha
+ ("`&" ?֗)  ; Revia
+ ("`*" ?֘)  ; Zarqa
+ ("`(" ?֙)  ; Pashta
+ ("`)" ?֚)  ; Yetiv
+ ("`_" ?֛)  ; Tevir
+ ("`+" ?֜)  ; Geresh (Accent)
+ ("`Q" ?֝)  ; Geresh Muqdam
+ ("`W" ?֞)  ; Gershayim (Accent)
+ ("`E" ?ׇ)  ; Qamats Qatan
+ ("`R" ?֟)  ; Qarney Para
+ ("`T" ?֠)  ; Telisha Gedola
+ ("`Y" ?֡)  ; Pazer
+ ("`U" ?ֺ)  ; Holam Haser for Vav
+ ("`I" ?֢)  ; Atnah Hafukh
+ ("`O" ?֣)  ; Munah
+;("`P" ??)  ; Reserved
+ ("`{" ?֤)  ; Mahapakh
+ ("`}" ?֥)  ; Merkha
+ ("`|" ?֦)  ; Merkha Kefula
+;("`A" ??)  ; Reserved
+;("`S" ??)  ; Reserved
+ ("`D" ?֧)  ; Darga
+ ("`F" ?֨)  ; Qadma
+ ("`G" ?֩)  ; Telisha Qetana
+ ("`H" ?֪)  ; Yerah Ben Yomo
+ ("`J" ?\u200D)  ; ZWJ
+ ("`K" ?֬)  ; Iluy
+ ("`L" ?“)  ; Left Double Quotation Mark (2nd)
+ ("`:" ?„)  ; Double Low-9 Quotation Mark
+ ("`\"" ?֭)  ; Dehi
+ ("`Z" ?֮)  ; Zinor
+ ("`X" ?֯)  ; Masora Circle
+ ("`C" ?\u034F)  ; CGJ
+ ("`V" ?׀)  ; Paseq
+ ("`B" ?׆)  ; Nun Hafukha
+ ("`N" ?\u200C)  ; ZWNJ
+;("`M" ??)  ; Unassigned
+;("`<" ??)  ; Unassigned
+ ("`>" ?ׅ)  ; Lower Dot
+ ("`?" ?ׄ)  ; Upper Dot
+)
+
+(quail-define-package
+ "hebrew-lyx" "Hebrew" "לִ" nil "Hebrew LyX input
method.
+
+Based on LyX keyboard layout.
+Additional mappings for Rafe and Yiddish ligatures.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("`" ?\;)
+ ("_" ?־)  ; Maqaf
+ ("q`" ?ְ)  ; Sheva
+ ("w" ?\')
+ ("e" ?ק)  ; Qof
+ ("r" ?ר)  ; Resh
+ ("t" ?א)  ; Alef
+ ("y" ?ט)  ; Tet
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?י)  ; Yod
+ ("j" ?ח)  ; Het
+ ("k" ?ל)  ; Lamed
+ ("l" ?ך)  ; Final Kaf
+ (";" ?ף)  ; Final Pe
+ ("'" ?,)
+ ("z" ?ז)  ; Zayin
+ ("x" ?ס)  ; Samekh
+ ("c" ?ב)  ; Bet
+ ("v" ?ה)  ; He
+ ("b" ?נ)  ; Nun
+ ("n" ?מ)  ; Mem
+ ("m" ?צ)  ; Tsadi
+ ("," ?ת)  ; Tav
+ ("." ?ץ)  ; Final Tsadi
+ ("/" ?.)  ; Stop
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("W" ?׳)  ; Geresh (Punct.)
+ ("E" ?ָ)  ; Qamats
+ ("R" ?ֿ)  ; Rafe
+ ("T" ?\u200E)  ; LRM
+ ("Y" ?\u200F)  ; RLM
+ ("U" ?ֹ)  ; Holam
+ ("I" ?ײ)  ; Yiddish Double Yod
+ ("O" ?װ)  ; Yiddish Double Vav
+ ("P" ?ַ)  ; Patah
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("A" ?ְ)  ; Sheva
+ ("S" ?ּ)  ; Dagesh or Mapiq
+ ("F"  ?״)  ; Gershayim (Punct.)
+ ("G" ?ׂ)  ; Sin dot
+ ("H" ?ׁ)  ; Shin dot
+ ("J" ?ִ)  ; Hiriq
+ ("K" ?₪)  ; New Sheqel sign
+ ("L" ?ױ)  ; Yiddish Vav Yod
+ ("X" ?ֶ)  ; Segol (Point)
+ ("C" ?ֻ)  ; Qubuts
+ ("V" ?ֱ)  ; Hataf Segol
+ ("B" ?ֲ)  ; Hataf Patah
+ ("N" ?ֳ)  ; Hataf Qamats
+ ("M" ?ֵ)  ; Tsere
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+)
+
+
+(quail-define-package
+ "hebrew-full" "Hebrew" "עִ֫" nil "Hebrew Full
method.
+
+Provides access to all Hebrew characters suitable to Modern Hebrew.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("`" ?\;)
+ ("-" ?־)  ; Maqaf
  ("w" ?')
- ("e" ?�)
- ("r" ?�)
- ("t" ?�)
- ("y" ?�)
- ("u" ?�)
- ("i" ?�)
- ("o" ?�)
- ("p" ?�)
- ("a" ?�)
- ("s" ?�)
- ("d" ?�)
- ("f" ?�)
- ("g" ?�)
- ("h" ?�)
- ("j" ?�)
- ("k" ?�)
- ("l" ?�)
- (";" ?�)
- ("z" ?�)
- ("x" ?�)
- ("c" ?�)
- ("v" ?�)
- ("b" ?�)
- ("n" ?�)
- ("m" ?�)
- ("," ?�)
- ("." ?�)
+ ("e" ?ק)  ; Qof
+ ("r" ?ר)  ; Resh
+ ("t" ?א)  ; Alef
+ ("y" ?ט)  ; Tet
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?י)  ; Yod
+ ("j" ?ח)  ; Het
+ ("k" ?ל)  ; Lamed
+ ("l" ?ך)  ; Final Kaf
+ (";" ?ף)  ; Final Pe
+ ("'" ?,)
+ ("z" ?ז)  ; Zayin
+ ("x" ?ס)  ; Samekh
+ ("c" ?ב)  ; Bet
+ ("v" ?ה)  ; He
+ ("b" ?נ)  ; Nun
+ ("n" ?מ)  ; Mem
+ ("m" ?צ)  ; Tsadi
+ ("," ?ת)  ; Tav
+ ("." ?ץ)  ; Final Tsadi
  ("/" ?.)
- ("'" ?,))
 
-;;; arch-tag: 771b887d-15af-4a4d-b4ce-a4a86f5ca0cf
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("Q" ?/)
+ ("W" ?׳)  ; Geresh (Punct.)
+ ("E" ?₪)  ; New Sheqel Sign
+ ("R" ?ֿ)  ; Rafe
+ ("T" ?ֱ)  ; Hataf Segol
+ ("Y" ?ױ)  ; Yiddish Vav Yod
+ ("U" ?װ)  ; Yiddish Double Vav
+ ("I" ?ֲ)  ; Hataf Patah
+ ("O" ?ֳ)  ; Hataf Qamats
+ ("P" ?״)  ; Gershayim (Punct.)
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("A" ?ְ)  ; Sheva
+ ("S" ?ּ)  ; Dagesh or Mapiq
+ ("D" ?ֻ)  ; Qubuts
+ ("F" ?ֹ)  ; Holam
+ ("G" ?ֶ)  ; Segol (Point)
+ ("H" ?ֵ)  ; Tsere
+ ("J" ?ִ)  ; Hiriq
+ ("K" ?ַ)  ; Patah
+ ("L" ?ָ)  ; Qamats
+ ("Z" ?ׂ)  ; Sin Dot
+ ("X" ?ׁ)  ; Shin Dot
+ ("C" ?֫)  ; Ole
+ ("V" ?ײ)  ; Yiddish Double Yod
+ ("B" ?׃)  ; Sof Pasuq
+ ("N" ?\u200E)  ; LRM
+ ("M" ?\u200F)  ; RLM
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+
+ ("q`" ?\u202D)  ; LRO
+ ("q1" ?\u202E)  ; RLO
+ ("q2" ?\u202A)  ; LRE
+ ("q3" ?\u202B)  ; RLE
+ ("q4" ?\u202C)  ; PDF
+ ("q5" ?\u034F)  ; CGJ
+ ("q6" ?֬)  ; Iluy
+ ("q8" ?֭)  ; Dehi
+ ("q9" ?ׇ)  ; Qamats Qatan
+ ("q0" ?֝)  ; Geresh Muqdam
+ ("q-" ?-)  ; Minus
+ ("q=" ?֮)  ; Zinor
+ ("q|" ?׀)  ; Paseq
+ ("qw" ?֯)  ; Masora Circle
+ ("qe" ?ׄ)  ; Upper Dot
+ ("qr" ?ׅ)  ; Lower Dot
+ ("qy" ?֟)  ; Qarney Para
+ ("qu" ?֓)  ; Shalshelet
+ ("qi" ?֞)  ; Gershayim (Accent)
+ ("qo" ?֜)  ; Geresh (Accent)
+ ("qp" ?֨)  ; Qadma
+ ("q[" ?׆)  ; Nun Hafukha
+ ("qa" ?ֺ)  ; Holam Haser for Vav
+ ("qs" ?֩)  ; Telisha Qetana
+ ("qd" ?֠)  ; Telisha Gedola
+ ("qf" ?֡)  ; Pazer
+ ("qg" ?֕)  ; Zaqef Gadol
+ ("qh" ?֔)  ; Zaqef Qatan
+ ("qj" ?֙)  ; Pashta
+ ("qk" ?֤)  ; Mahapakh
+ ("ql" ?֗)  ; Revia
+ ("q;" ?֒)  ; Segol (Accent)
+ ("q'" ?֘)  ; Zarqa
+ ("qz" ?֪)  ; Yerah Ben Yomo
+ ("qx" ?֦)  ; Merkha Kefula
+ ("qc" ?֚)  ; Yetiv
+ ("qv" ?֛)  ; Tevir
+ ("qb" ?֧)  ; Darga
+ ("qn" ?֑)  ; Etnahta
+ ("qm" ?֣)  ; Munah
+ ("q," ?֖)  ; Tipeha
+ ("q." ?֥)  ; Merkha
+ ("q/" ?ֽ)  ; Meteg
+)
+
+
+(quail-define-package
+ "hebrew-biblical-tiro" "Hebrew" "תִרֹ" nil
+"Biblical Hebrew Tiro input method.
+
+Based on Society of Biblical Literature's Tiro keyboard layout.
+Not suitable for modern Hebrew input.
+ 'q' is used to switch levels instead of Alt-Gr.
+ Combining dot above (Called Masora dot) (̇) is mapped to 'q1'.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("`" ?׃)  ; Sof Pasuq
+ ("-" ?־)  ; Maqaf
+ ("=" ?◦)  ; White Bullet
+ ("w" ?׳)  ; Geresh (Punct.)
+ ("e" ?ק)  ; Qof
+ ("r" ?ר)  ; Resh
+ ("t" ?א)  ; Alef
+ ("y" ?ט)  ; Tet
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("\\" ?׀)  ; Paseq
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?י)  ; Yod
+ ("j" ?ח)  ; Het
+ ("k" ?ל)  ; Lamed
+ ("l" ?ך)  ; Final Kaf
+ (";" ?ף)  ; Final Pe
+ ("'" ?֚)  ; Yetiv
+ ("z" ?ז)  ; Zayin
+ ("x" ?ס)  ; Samekh
+ ("c" ?ב)  ; Bet
+ ("v" ?ה)  ; He
+ ("b" ?נ)  ; Nun
+ ("n" ?מ)  ; Mem
+ ("m" ?צ)  ; Tsadi
+ ("," ?ת)  ; Tav
+ ("." ?ץ)  ; Final Tsadi
+ ("/" ?֭)  ; Dehi
+ ("~" ?֮)  ; Zinor
+ ("!" ?֩)  ; Telisha Qetana
+ ("@" ?֙)  ; Pashta
+ ("#" ?֒)  ; Segol (Accent)
+ ("$" ?֯)  ; Masora circle
+ ("%" ?ֺ)  ; Holam Haser for Vav
+ ("^" ?ֹ)  ; Holam
+ ("&" ?ֿ)  ; Rafe
+ ("*" ?ׂ)  ; Sin dot
+ ("(" ?ׁ)  ; Shin dot
+ (")" ?֝)  ; Geresh Muqdam
+ ("_" ?֠)  ; Telisha Gedola
+ ("+" ?ּ)  ; Dagesh or Mapiq
+ ("Q" ?ׄ)  ; Upper dot
+ ("W" ?֬)  ; Iluy
+ ("E" ?֫)  ; Ole
+ ("R" ?֟)  ; Qarney Para
+ ("T" ?֓)  ; Shalshelet
+ ("Y" ?֞)  ; Gershayim (Accent)
+ ("U" ?֜)  ; Geresh (Accent)
+ ("I" ?֡)  ; Pazer
+ ("O" ?֕)  ; Zaqef Gadol
+ ("P" ?֔)  ; Zaqef Qatan
+ ("{" ?֗)  ; Revia
+ ("}" ?֘)  ; Zarqa
+ ("|" ?֨)  ; Qadma
+ ("A" ?ֽ)  ; Meteg
+ ("S" ?ְ)  ; Sheva
+ ("D" ?ֻ)  ; Qubuts
+ ("F" ?ִ)  ; Hiriq
+ ("G" ?ֱ)  ; Hataf Segol
+ ("H" ?ֶ)  ; Segol (Point)
+ ("J" ?ֵ)  ; Tsere
+ ("K" ?ֳ)  ; Hataf Qamats
+ ("L" ?ָ)  ; Qamats
+ (":" ?ֲ)  ; Hataf Patah
+ ("\"" ?ַ)  ; Patah
+ ("Z" ?ׅ)  ; Lower dot
+ ("X" ?֤)  ; Mahapakh
+ ("C" ?֪)  ; Yerah Ben Yomo
+ ("V" ?֦)  ; Merkha Kefula
+ ("B" ?֥)  ; Merkha
+ ("N" ?֧)  ; Darga
+ ("M" ?֛)  ; Tevir
+ ("<" ?֑)  ; Etnahta
+ (">" ?֖)  ; Tipeha
+ ("?" ?֣)  ; Munah
+
+ ("q`" ?\;)
+ ("q1" ?\u0307)  ; Combining dot above
+ ("q2" ?\u0336)  ; Combining long stroke overlay
+ ("q3" ?\u030A)  ; Combining ring above
+ ("q4" ?₪)  ; New Sheqel Sign
+ ("q5" ?\u200D)  ; ZWJ
+ ("q6" ?\u200C)  ; ZWNJ
+ ("q7" ?\u034F)  ; CGJ
+ ("q8" ?\u200E)  ; LRM
+ ("q9" ?\u200F)  ; RLM
+ ("q0" ?◌)  ; Dotted Circle
+ ("q-" ?-)  ; Minus
+ ("q=" ?•)  ; Bullet
+ ("qq" ?\u0308)  ; Combining Diaeresis
+ ("qw" ?״)  ; Gershayim (Punct.)
+ ("qe" ?€)  ; Euro Sign
+ ("qu" ?װ)  ; Yiddish Double Vav
+ ("q\\" ?\\)
+ ("qh" ?ײ)  ; Yiddish Double Yod
+ ("qj" ?ױ)  ; Yiddish Vav Yod
+ ("ql" ?ׇ)  ; Qamats Qatan
+ ("q'" ?,)
+ ("qc" ?֢)  ; Atnah Hafukh
+ ("qb" ?׆)  ; Nun Hafukha
+ ("q/" ?.)
+
+ ("q~" ?~)
+ ("q!" ?!)
+ ("q@" ?@)
+ ("q#" ?#)
+ ("q$" ?$)
+ ("q%" ?%)
+ ("q^" ?^)
+ ("q&" ?&)
+ ("q*" ?*)
+ ("q(" ?\))  ; mirroring
+ ("q)" ?\()  ; mirroring
+ ("q_" ?_)
+ ("q+" ?+)
+ ("qQ" ?/)
+ ("qW" ?')
+ ("q{" ?})  ; mirroring
+ ("q}" ?{)  ; mirroring
+ ("q|" ?|)
+ ("q:" ?:)
+ ("q\"" ?\")
+ ("q<" ?>)
+ ("q>" ?<)
+ ("q?" ??)
+)
+
+(quail-define-package
+ "hebrew-biblical-sil" "Hebrew" "סִל" nil
+"Biblical Hebrew SIL input method.
+
+Based on Society of Biblical Literature's SIL keyboard layout.
+Phonetic and not suitable for modern Hebrew input.
+ '`' is used to switch levels instead of Alt-Gr.
+ Euro Sign (€) is mapped to 'Z'.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("-" ?־)  ; Maqaf
+ ("=" ?ּ)  ; Dagesh or Mapiq
+ ("q" ?ק)  ; Qof
+ ("w" ?ו)  ; Vav
+ ("e" ?ֶ)  ; Segol (Point)
+ ("r" ?ר)  ; Resh
+ ("t" ?ת)  ; Tav
+ ("y" ?י)  ; Yod
+ ("u" ?ֻ)  ; Qubuts
+ ("i" ?ִ)  ; Hiriq
+ ("o" ?ֹ)  ; Holam
+ ("p" ?פ)  ; Pe
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("\\" ?׀)  ; Paseq
+ ("a" ?ַ)  ; Patah
+ ("s" ?ס)  ; Samekh
+ ("d" ?ד)  ; Dalet
+ ("f" [ "שׂ" ])  ; Shin + Sin dot
+ ("g" ?ג)  ; Gimel
+ ("h" ?ה)  ; He
+ ("j" [ "שׁ" ])  ; Shin + Shin dot
+ ("k" ?כ)  ; Kaf
+ ("l" ?ל)  ; Lamed
+ (";" ?ְ)  ; Sheva
+ ("'" ?’)  ; Right Single Quotation Mark
+ ("z" ?ז)  ; Zayin
+ ("x" ?ח)  ; Het
+ ("c" ?צ)  ; Tsadi
+ ("v" ?ט)  ; Tet
+ ("b" ?ב)  ; Bet
+ ("n" ?נ)  ; Nun
+ ("m" ?מ)  ; Mem
+
+ ("~" ?₪)  ; New Sheqel Sign
+ ("@" ?֘)  ; Zarqa
+ ("#" ?֨)  ; Qadma
+ ("$" ?֜)  ; Geresh (Accent)
+ ("%" ?֞)  ; Gershayim (Accent)
+ ("&" ?֬)  ; Iluy
+ ("*" ?֝)  ; Geresh Muqdam
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("_" ?–)  ; Em Dash
+ ("Q" ?֗)  ; Revia
+ ("E" ?ֵ)  ; Tsere
+ ("Y" ?֟)  ; Qarney Para
+ ("O" ?ֺ)  ; Holam Haser for Vav
+ ("P" ?ף)  ; Final Pe
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+
+ ("A" ?ָ)  ; Qamats
+ ("S" ?ש)  ; Shin
+ ("K" ?ך)  ; Final Kaf
+ (":" ?״)  ; Gershayim (Punct.)
+ ("\"" ?”)  ; Right Double Quotation Mark
+ ("Z" ?€)  ; Euro Sign
+ ("C" ?ץ)  ; Final Tsadi
+ ("N" ?ן)  ; Final Nun
+ ("M" ?ם)  ; Final Mem
+ ("<" ?ע)  ; Ayin
+ (">" ?א)  ; Alef
+
+ ("``" ?$)
+ ("`1" ?ֽ)  ; Meteg
+ ("`2" ?֢)  ; Atnah Hafukh
+ ("`3" ?֖)  ; Tipeha
+ ("`4" ?֥)  ; Merkha
+ ("`5" ?֦)  ; Merkha Kefula
+ ("`6" ?֭)  ; Dehi
+ ("`7" ?֣)  ; Munah
+ ("`8" ?֛)  ; Tevir
+ ("`9" ?֧)  ; Darga
+ ("`0" ?֪)  ; Yerah Ben Yomo
+ ("`-" ?—)  ; Em Dash
+ ("`=" ?֑)  ; Etnahta
+ ("`]" ?֚)  ; Accent Yetiv
+ ("`\\" ?֤)  ; Mahapakh
+ ("`a" ?ׇ)  ; Qamats Qatan
+ ("`g" ? ◦)  ; White Bullet
+ ("`h" ?\u0336)  ; Combining Long Stroke Overlay
+ ("`;" ?\;)
+ ("`'" ?\u0323); Combining Dot Below (Lower Point??)
+ ("`m" ?\u200C)  ; ZWNJ
+ ("`," ?»)  ; mirroring
+ ("`." ?«)  ; mirroring
+ ("`/" ?׳)  ; Geresh (Punct.)
+
+ ("`!" ?֗)  ; Revia
+ ("`@" ?֮)  ; Zinor
+ ("`#" ?֙)  ; Pashta
+ ("`$" ?֠)  ; Telisha Gedola
+ ("`%" ?֩)  ; Telisha Qetana
+ ("`&" ?֡)  ; Pazer
+ ("`*" ?֕)  ; Zaqef Gadol
+ ("`(" ?֓)  ; Shalshelet
+ ("`)" ?֯)  ; Masora Circle
+ ("`_" ?ֿ)  ; Rafe
+ ("`+" ?◌)  ; Dotted Circle
+ ("`E" ?ֱ)  ; Hataf Segol
+ ("`O" ?ֳ)  ; Hataf Qamats
+ ("`P" ?\u034F)  ; CGJ
+ ("`{" ?֔)  ; Zaqef Qatan
+ ("`}" ?֒)  ; Segol (Accent)
+ ("`|" ?֫)  ; Ole
+ ("`A" ?ֲ)  ; Hataf Patah
+ ("`G" ?•)  ; Bullet
+ ("`H" ?\u030A)  ; Combining ring above
+ ("`:" ?׃)  ; Sof Pasuq
+ ("`\"" ?ׄ)  ; Upper Dot
+ ("`M" ?\u200D)  ; ZWJ
+ ("`<" ?\u0307)  ; Combining dot above
+ ("`>" ?\u0308)  ; Combining Diaeresis
+)
+
+
+(quail-define-package
+ "yiddish-royal" "Hebrew" "ײר" nil "Yiddish Royal
input method.
+
+Based on Royal Yiddish typewriter.
+Better for yiddish than Hebrew methods.
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("`" ?~)
+ ("q" ?ק)  ; Qof
+ ("w" [ "אָ" ])  ; Qamats Alef (Komets Alef)
+ ("e" ?ר)  ; Resh
+ ("r" ?א)  ; Alef (Shtumer Alef)
+ ("t" ?ט)  ; Tet
+ ("y" ?װ)  ; Yiddish Double Vav (Tsvey Vovn)
+ ("u" ?ו)  ; Vav
+ ("i" ?ן)  ; Final Nun
+ ("o" ?ם)  ; Final Mem
+ ("p" [ "פֿ" ])  ; Rafe Pe (Fey)
+ ("[" [ "פּ" ])  ; Dagesh Pe (Pey)
+ ("]" ?,)
+ ("a" ?ש)  ; Shin
+ ("s" ?ד)  ; Dalet
+ ("d" ?ג)  ; Gimel
+ ("f" ?כ)  ; Kaf
+ ("g" ?ע)  ; Ayin
+ ("h" ?ײ)  ; Yiddish Double Yod (Tsvey Yudn)
+ ("j" ?י)  ; Yod
+ ("k" ?ח)  ; Het
+ ("l" ?ל)  ; Lamed
+ (";" ?ך)  ; Final Kaf
+ ("'" ?ף)  ; Final Pe
+ ("z" ?.)
+ ("x" ?ז)  ; Zayin
+ ("c" ?ס)  ; Samekh
+ ("v" ?ב)  ; Bet
+ ("b" ?ה)  ; He
+ ("n" ?נ)  ; Nun
+ ("m" ?מ)  ; Mem
+ ("," ?צ)  ; Tsadi
+ ("." ?ת)  ; Tav
+ ("/" ?ץ)  ; Final Tsadi
+
+ ("~" ?@)
+ ("!" ?”)  ; Right Double Quotation Mark
+ ("@" ?„)  ; Double Low-9 Quotation Mark
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("Q" ?“)  ; Left Double Quotation Mark
+ ("W" ?”)  ; Right Double Quotation Mark
+ ("E" ?ײ)  ; Yiddish Double Yod (x2)
+ ("R" [ "אַ" ])  ; Patah Alef (Pasekh Alef)
+; ("T" "")
+ ("Y" ?ױ)  ; Ligature Yiddish Vav Yod (vov yud)
+ ("U" [ "וּ" ])  ; Melupm vov
+ ("I" ?/)
+ ("O" ?\\)
+ ("P" ?פ)  ; Pe
+ ("{" ??)
+ ("}" ?!)
+ ("A" [ "שׂ" ])  ; Shin + Sin dot
+ ("S" [ "שׂ" ])  ; Shin + Sin dot
+; ("D" "")
+ ("F" [ "כּ" ])  ; Dagesh Kaf (Kof)
+; ("G" "")
+ ("H" [ "ײַ" ])  ; Yiddish Double Yod + Patah (Pasekh Tsvey Yudn)
+ ("J" [ "יִ" ])  ; Khirik Yud
+ ("K" ?})  ; mirroring
+ ("L" ?{)  ; mirroring
+ ("\"" ?\;)
+ ("Z" ??)
+ ("X" ?|)
+ ("C"  [ "בּ" ])  ; Dagesh Bet (Beys)
+ ("V" [ "בֿ" ])  ; Rafe Bet (Veys)
+ ("B" ?\])  ; mirroring
+ ("N" ?\[)  ; mirroring
+ ("M" ?>)  ; mirroring
+ ("<" ?<)  ; mirroring
+ (">" [ "תּ" ])  ; Dagesh Tav (Tof)
+ ("?" ?\')
+)
+
+
+(quail-define-package
+ "yiddish-keyman" "Hebrew" "ײק" nil "Yiddish Keyman
input method.
+
+Based on Keyman keyboard layout.
+Better for yiddish than Hebrew methods..
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("`" ?\;)
+ ("q" ?„)  ; Double Low-9 Quotation Mark
+ ("w" ?ש)  ; Shin
+ ("e" ?ע)  ; Ayin
+ ("r" ?ר)  ; Resh
+ ("t" ?ט)  ; Tet
+ ("y" ?י)  ; Yod
+ ("u" ?ו)  ; Vav
+ ("i" ?י)  ; Yod (x2)
+ ("o" [ "אָ" ])  ; Qamats Alef (Komets Alef)
+ ("p" [ "פּ" ])  ; Dagesh Pe (Pey)
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("a"  [ "אַ" ])  ; Patah Alef (Pasekh Alef)
+ ("s" ?ס)  ; Samekh
+ ("d" ?ד)  ; Dalet
+ ("f" [ "פֿ" ])  ; Rafe Pe (Fey)
+ ("g" ?ג)  ; Gimel
+ ("h" ?ה)  ; He
+ ("j" ?ײ)  ; Yiddish Double Yod (Tsvey Yudn)
+ ("k" ?ק)  ; Qof
+ ("l" ?ל)  ; Lamed
+ ("z" ?ז)  ; Zayin
+ ("x" ?כ)  ; Kaf
+ ("c" ?צ)  ; Tsadi
+ ("v" ?װ)  ; Yiddish Double Vav (Tsvey Vovn)
+ ("b" ?ב)  ; Bet
+ ("n" ?נ)  ; Nun
+ ("m" ?מ)  ; Mem
+
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("Q" ?”)  ; Right Double Quotation Mark
+ ("W" [ "שׂ" ])  ; Shin + Sin dot
+ ("E" ?ײ)  ; Yiddish Double Yod (x2)
+; ("R" "")  ;
+ ("T" [ "תּ" ])  ; Dagesh Tav (Tof)
+ ("Y" [ "ײַ" ])  ; Yiddish Double Yod + Patah (Pasekh Tsvey Yudn)
+ ("U" [ "וּ" ])  ; Melupm vov
+ ("I" [ "יִ" ])  ; Khirik Yud
+ ("O" ?ױ)  ; Ligature Yiddish Vav Yod (vov yud)
+; ("P" "")
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("A" ?א)  ; Alef (Shtumer Alef)
+ ("S" ?ת)  ; Tav
+ ("F"  ?ף)  ; Final Pe
+ ("G" ?׳)  ; Geresh (Punct.)
+ ("H" ?ח)  ; Het
+ ("J" ?ײ)  ; Yiddish Double Yod (x2)
+ ("K" [ "כּ" ])  ; Dagesh Kaf (Kof)
+; ("L" "")
+; ("Z" "")
+ ("X" ?ך)  ; Final Kaf
+ ("C" ?ץ)  ; Final Tsadi
+ ("V" [ "בֿ" ])  ; Rafe Bet (Veys) )  ; Bet
+; ("B" "")
+ ("N" ?ן)  ; Final Nun
+ ("M" ?ם)  ; Final Mem
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+)
+
+
+(quail-define-package
+ "hebrew-phonetic-xkb" "Hebrew" "פ" nil "Hebrew
phonetic (XKB) input method. 
+Based on the XKB hebrew-phonetic  keyboard layout, 
+layout that attempts to match Hebrew letters to English phonetic equivalents, some of its
chars however 
+are mapped according to their shape, as o--> samesh.
+;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ ;~
+;;  קק וו אא רר תט עע וו יי סס פף ]}[{
+;;    אא שש דד פפ גג הה יי כך לל;:'\"\|
+;;     זז חח צץ וו בב נן מם ,>.</?
+;;
+" nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+
+ ("A" ?א)  ; Alef
+ ("B" ?ב)  ; Bet
+ ("C" ?ץ)  ; Final Tsadi
+ ("D" ?ד)  ; Dalet
+ ("E" ?א)  ; aleph
+ ("E" ?א)  ; aleph
+ ("F" ?ף)  ; Final Pe
+ ("G" ?ג)  ; Gimel
+ ("H" ?ה)  ; He
+ ("I" ?י)  ; Yod
+ ("J" ?י)  ; Yod
+ ("K" ?ך)  ; Kaf sofit
+ ("L" ?ל)  ; Lamed
+ ("M" ?ם)  ; Final Mem
+ ("N" ?ן)  ; Final Nun
+ ("O" ?ס)  ; Samekh
+ ("P" ?ף)  ; Final Pe
+ ("Q" ?ק)  ; Kuf
+ ("R" ?ר)  ; Resh
+ ("S" ?ש)  ; Shin
+ ("T" ?ט)  ; Tet
+ ("U" ?ו)  ; Vav
+ ("V" ?ו)  ; Vav
+ ("W" ?ו)  ; Vav
+ ("X" ?ח)  ; Het
+ ("Y" ?ע)  ; Ayin
+ ("Z" ?ז)  ; Zayin
+ ("a" ?א)  ; Alef
+ ("b" ?ב)  ; Bet
+ ("c" ?צ)  ; Tsadi
+ ("d" ?ד)  ; Dalet
+ ("e" ?א)  ; aleph
+ ("f" ?פ)  ; fe
+ ("g" ?ג)  ; Gimel
+ ("h" ?ה)  ; He
+ ("i" ?י)  ; Yod
+ ("j" ?י)  ; Yod
+ ("k" ?כ)  ; Kaf
+ ("l" ?ל)  ; Lamed
+ ("m" ?מ)  ; Mem
+ ("n" ?נ)  ; Nun
+ ("o" ?ס)  ; Samekh
+ ("p" ?פ)  ; Pe
+ ("q" ?ק)  ; Kuf
+ ("r" ?ר)  ; Resh
+ ("s" ?ש)  ; Shin
+ ("t" ?ת)  ; Tav
+ ("u" ?ו)  ; Vav
+ ("v" ?ו)  ; Vav
+ ("w" ?ו)  ; Vav
+ ("x" ?ח)  ; Het
+ ("y" ?ע)  ; Ayin
+ ("z" ?ז)  ; Zayin
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("." ?.)  ; Stop
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+)
+
+
+
+(quail-define-package
+ "hebrew-phonetic-qwerty" "Hebrew" "ף" nil "Hebrew
phonetic   input method.
+
+Based on the KDE hebrew-phonetic  keyboard layout, layout that
+attempts to match Hebrew letters to English phonetic equivalents.
+It is however modified, c=chet x zadik, o=wav y=ain e=aleph. Moreover some but 
+not all niqqud are added.
+;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ ;~
+;;  קֹ וׁ אֶ רר  תט עע וּ יִ וֹ פַ ]}[{
+;;    אָ שס דּ פף גג הה יִ כך לְ ;: '\" \|
+;;     זֵ צץ חֻ וו בּ נן מם ,>.</?
+;;
+" nil t t t t nil nil nil nil nil t)
+
+
+(quail-define-rules
+
+
+ ("A" ?ָ)  ; Qamats
+ ("B" ?ּ)  ; Dagesh or Mapiq
+ ("C" ?ֻ)  ; Qubuts
+ ("D" ?ּ)  ; Dagesh or Mapiq
+ ("E" ?ֶ)  ; Segol (Point)
+ ("F" ?ף)  ; Final Pe
+ ("G" ?ג)  ; Gimel
+ ("H" ?ה)  ; He
+ ("I" ?ִ)  ; Hiriq
+ ("J" ?ִ)  ; Hiriq
+ ("K" ?ך)  ; Kaf sofit
+ ("L" ?ְ)  ; Sheva
+ ("M" ?ם)  ; Final Mem
+ ("N" ?ן)  ; Final Nun
+ ("O" ?ֹ)  ; Holam
+ ("P" ?ַ)  ; Patah
+ ("Q" ?ֹ)  ; Holam
+ ("R" ?ר)  ; Resh
+ ("S" ?ס)  ; Samekh
+ ("T" ?ט)  ; Tet
+ ("U" ?ּ)  ; Dagesh or Mapiq
+ ("V" ?ו)  ; Vav
+ ("W" ?ׁ)  ; Shin dot
+ ("X" ?ץ)  ; Final Tsadi
+ ("Y" ?ע)  ; Ayin
+ ("Z" ?ֵ)  ; Tsere
+ ("a" ?א)  ; Alef
+ ("b" ?ב)  ; Bet
+ ("c" ?ח)  ; Het
+ ("d" ?ד)  ; Dalet
+ ("e" ?א)  ; aleph
+ ("f" ?פ)  ; fe
+ ("g" ?ג)  ; Gimel
+ ("h" ?ה)  ; He
+ ("i" ?י)  ; Yod
+ ("j" ?י)  ; Yod
+ ("k" ?כ)  ; Kaf
+ ("l" ?ל)  ; Lamed
+ ("m" ?מ)  ; Mem
+ ("n" ?נ)  ; Nun
+ ("o" ?ו)  ; Vav
+ ("p" ?פ)  ; Pe
+ ("q" ?ק)  ; Kuf
+ ("r" ?ר)  ; Resh
+ ("s" ?ש)  ; Shin
+ ("t" ?ת)  ; Tav
+ ("u" ?ו)  ; Vav
+ ("v" ?ו)  ; Vav
+ ("w" ?ו)  ; Vav
+ ("x" ?צ)  ; Tsadi
+ ("y" ?ע)  ; Ayin
+ ("z" ?ז)  ; Zayin
+ ("[" ?\])  ; mirroring
+ ("]" ?\[)  ; mirroring
+ ("." ?.)  ; Stop
+ ("(" ?\))  ; mirroring
+ (")" ?\()  ; mirroring
+ ("{" ?})  ; mirroring
+ ("}" ?{)  ; mirroring
+ ("<" ?>)  ; mirroring
+ (">" ?<)  ; mirroring
+)
+
+
+
+
+
 ;;; hebrew.el ends here
-- 
‘Liston operated so fast that he once accidentally amputated an assistant’s
fingers along with a patient’s leg, […] The patient and the assistant both
died of sepsis, and a spectator reportedly died of shock, resulting in the
only known procedure with a 300% mortality.’ (Atul Gawande, NEJM, 2012)
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches