* lisp/leim/quail/georgian.el: Add georgian-nuskhuri input method

diff --git a/lisp/leim/quail/georgian.el b/lisp/leim/quail/georgian.el
index 52f035f95d9c4e8774547dfe8707ff3f59362d43..a1cdb58465387c486a3eb5fccb08b269bb059f5d 100644 (file)
--- a/lisp/leim/quail/georgian.el
+++ b/lisp/leim/quail/georgian.el
@@ -28,6 +28,8 @@
 ;;   <mleisher@crl.nmsu.edu>.
 ;;
 ;; - QWERTY-based Georgian.
+;;
+;; - QWERTY-based Nuskhuri script.
 
 ;;; Code:
 
@@ -131,4 +133,50 @@
  ("G" ?ჷ)
  )
 
+(quail-define-package
+ "georgian-nuskhuri" "Georgian" "ⴌ" t
+ "Nuskhuri Georgian (QWERTY-based)."
+ nil t nil nil t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("a" ?ⴀ)
+ ("b" ?ⴁ)
+ ("g" ?ⴂ)
+ ("d" ?ⴃ)
+ ("e" ?ⴄ)
+ ("v" ?ⴅ)
+ ("z" ?ⴆ)
+ ("T" ?ⴇ)
+ ("i" ?ⴈ)
+ ("k" ?ⴉ)
+ ("l" ?ⴊ)
+ ("m" ?ⴋ)
+ ("n" ?ⴌ)
+ ("o" ?ⴍ)
+ ("p" ?ⴎ)
+ ("J" ?ⴏ)
+ ("r" ?ⴐ)
+ ("s" ?ⴑ)
+ ("t" ?ⴒ)
+ ("u" ?ⴓ)
+ ("f" ?ⴔ)
+ ("q" ?ⴕ)
+ ("R" ?ⴖ)
+ ("y" ?ⴗ)
+ ("S" ?ⴘ)
+ ("C" ?ⴙ)
+ ("c" ?ⴚ)
+ ("Z" ?ⴛ)
+ ("w" ?ⴜ)
+ ("W" ?ⴝ)
+ ("x" ?ⴞ)
+ ("j" ?ⴟ)
+ ("h" ?ⴠ)
+ ("X" ?ⴤ)
+ ("H" ?ⴡ)
+ ("K" ?ⴥ)
+ ("I" ?ⴢ)
+ ("V" ?ⴣ)
+ )
+
 ;;; georgian.el ends here