Add missing keys that exist on the Arabic X keyboard. Don't insert

Lam-alef ligatures from the Arabic Presentation Forms ranges; instead,
separate Lam-Alef ligatures into a list of two letters (Lam and a
suitable Alef).

diff --git a/leim/ChangeLog b/leim/ChangeLog
index aec6c247d67e2f665d6ad2ebf7ffe3213eed8c98..59da6bac54aee5ad075257711418a75d6be3a96f 100644 (file)
--- a/leim/ChangeLog
+++ b/leim/ChangeLog
@@ -1,3 +1,10 @@
+2009-08-21  Thamer Mahmoud  <thamer.mahmoud@gmail.com>  (tiny change)
+
+       * quail/arabic.el: Add missing keys that exist on the Arabic X
+       keyboard.  Don't insert Lam-alef ligatures from the Arabic
+       Presentation Forms ranges; instead, separate Lam-Alef ligatures
+       into a list of two letters (Lam and a suitable Alef).
+
 2009-06-23  Kenichi Handa  <handa@m17n.org>
 
        * quail/hangul.el (hangul-to-hanja-conversion): When it is called

diff --git a/leim/quail/arabic.el b/leim/quail/arabic.el
index 0e28b569153ceadc0925523734985797da07e3f1..26d66ae426142a34650605b0150003ce2f92cfb5 100644 (file)
--- a/leim/quail/arabic.el
+++ b/leim/quail/arabic.el
@@ -40,42 +40,42 @@ Based on Arabic table in X Keyboard Configuration DB.
 
 (quail-define-rules
  ("`" ?ذ)
+ ("~" ?ّ)
 
  ("Q" ?َ)
  ("W" ?ً)
  ("E" ?ُ)
  ("R" ?ٌ)
- ("T" ?ﻹ)
+ ("T" ["لإ"])
  ("Y" ?إ)
  ("U" ?`)
  ("I" ?÷)
  ("O" ?×)
  ("P" ?؛)
+ ("{" ?<)
+ ("}" ?>)
 
  ("A" ?ِ)
  ("S" ?ٍ)
  ("D" ?])
  ("F" ?[)
- ("G" ?ﻷ)
+ ("G" ["لأ"])
  ("H" ?أ)
  ("J" ?ـ)
  ("K" ?،)
  ("L" ?/)
- (";" ?:)
 
  ("Z" ?~)
  ("X" ?ْ)
  ("C" ?})
  ("V" ?{)
- ("B" ?ﻵ)
+ ("B" ["لآ"])
  ("N" ?آ)
  ("M" ?')
  ("<" ?,)
  (">" ?.)
  ("?" ?؟)
 
- ("`" ?ذ)
-
  ("q" ?ض)
  ("w" ?ص)
  ("e" ?ث)
@@ -86,6 +86,8 @@ Based on Arabic table in X Keyboard Configuration DB.
  ("i" ?ه)
  ("o" ?خ)
  ("p" ?ح)
+ ("[" ?ج)
+ ("]" ?د)
 
  ("a" ?ش)
  ("s" ?س)
@@ -97,19 +99,18 @@ Based on Arabic table in X Keyboard Configuration DB.
  ("k" ?ن)
  ("l" ?م)
  (";" ?ك)
+ ("'" ?ط)
 
  ("z" ?ئ)
  ("x" ?ء)
  ("c" ?ؤ)
  ("v" ?ر)
- ("b" ?ﻻ)
+ ("b" ["لا"])
  ("n" ?ى)
  ("m" ?ة)
  ("," ?و)
  ("." ?ز)
- ("/" ?ظ)
-
- ("'" ?ط))
+ ("/" ?ظ))
 
 ;; arch-tag: 7e81e2af-5ea5-417f-bfe7-dfa6fd955cb5
 ;;; arabic.el ends here