From: Wojciech Gac Date: Wed, 13 Mar 2019 01:10:19 +0000 (+0100) Subject: Add Skolt Sami and Inari Sami input methods X-Git-Tag: emacs-27.0.90~3412 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0b5f5954e1e660b102785125ed92545b3ce2cd4a;p=emacs.git Add Skolt Sami and Inari Sami input methods --- diff --git a/lisp/leim/quail/sami.el b/lisp/leim/quail/sami.el new file mode 100644 index 00000000000..763826dbdad --- /dev/null +++ b/lisp/leim/quail/sami.el @@ -0,0 +1,281 @@ + +;;; Commentary: + +;;; Code + +(require 'quail) + +;; (quail-define-package +;; "northern-sami-prefix" "Sámi" "/NoS" nil +;; "Northern Sámi input method + +;; Alphabet: +;; А а Á á B b C c Č č D d Đ đ E e +;; F f G g H h I i J j K k L l M m +;; N n Ŋ ŋ O o P p R r S s Š š T t +;; Ŧ ŧ U u V v Z z Ž ž +;; " +;; nil t nil nil nil nil nil nil nil nil t) + +;; (quail-define-rules) + +;; (quail-define-package +;; "inari-sami-prefix" "Sámi" "/InS" nil +;; "Inari Sámi input method + +;; Alphabet (parenthesized letters are used in foreign names only): +;; А а Â â B b C c Č č D d Đ đ E e +;; F f G g H h I i J j K k L l M m +;; N n O o P p (Q q) R r S s Š š T t +;; U u V v (W w) (X x) Y y Z z Ž ž Ä ä +;; Á á Å å Ö ö +;; " +;; nil t nil nil nil nil nil nil nil nil t) + +;; (quail-define-rules) + +(quail-define-package + "skolt-sami-prefix" "Sámi" "/SkS" nil + "Skolt Sámi input method + +Alphabet (parenthesized letters are used in foreign names only): +А а Â â B b C c Č č Ʒ ʒ Ǯ ǯ D d +Đ đ E e F f G g Ǧ ǧ Ǥ ǥ H h I i +J j K k Ǩ ǩ L l M m N n Ŋ ŋ O o +Õ õ P p (Q q) R r S s Š š T t U u +V v (W w) (X x) (Y y) Z z Ž ž Å å Ä ä +(Ö ö) ʹ +" + nil t nil nil nil nil nil nil nil nil t) + +(quail-define-rules + ("A" ?А) + ("a" ?а) + ("^A" ?Â) + ("^a" ?â) + ("B" ?B) + ("b" ?b) + ("C" ?C) + ("c" ?c) + ("^C" ?Č) + ("^c" ?č) + ("/X" ?Ʒ) + ("/x" ?ʒ) + ("^X" ?Ǯ) + ("^x" ?ǯ) + ("D" ?D) + ("d" ?d) + ("-D" ?Đ) + ("-d" ?đ) + ("E" ?E) + ("e" ?e) + ("F" ?F) + ("f" ?f) + ("G" ?G) + ("g" ?g) + ("^G" ?Ǧ) + ("^g" ?ǧ) + ("-G" ?Ǥ) + ("-g" ?ǥ) + ("H" ?H) + ("h" ?h) + ("I" ?I) + ("i" ?i) + ("J" ?J) + ("j" ?j) + ("K" ?K) + ("k" ?k) + ("^K" ?Ǩ) + ("^k" ?ǩ) + ("L" ?L) + ("l" ?l) + ("M" ?M) + ("m" ?m) + ("N" ?N) + ("n" ?n) + ("/N" ?Ŋ) + ("/n" ?ŋ) + ("O" ?O) + ("o" ?o) + ("~O" ?Õ) + ("~o" ?õ) + ("P" ?P) + ("p" ?p) + ("Q" ?Q) + ("q" ?q) + ("R" ?R) + ("r" ?r) + ("S" ?S) + ("s" ?s) + ("^S" ?Š) + ("^s" ?š) + ("T" ?T) + ("t" ?t) + ("U" ?U) + ("u" ?u) + ("V" ?V) + ("v" ?v) + ("W" ?W) + ("w" ?w) + ("X" ?X) + ("x" ?x) + ("Y" ?Y) + ("y" ?y) + ("Z" ?Z) + ("z" ?z) + ("^Z" ?Ž) + ("^z" ?ž) + ("/A" ?Å) + ("/a" ?å) + (":A" ?Ä) + (":a" ?ä) + (":O" ?Ö) + (":o" ?ö)) + +(quail-define-package + "kildin-sami-prefix" "Sámi" "/KiS" nil + "Kildin Sámi input method + +Alphabet (parenthesized letters are used in foreign names only): +А а А̄ а̄ Ӓ ӓ Б б В в Г г Д д Е е Е̄ е̄ +Ё ё Ё̄ ё̄ Ж ж З з Һ һ (') И и Ӣ ӣ Й й +Ј ј (Ҋ ҋ) К к Л л Ӆ ӆ М м Ӎ ӎ Н н Ӊ ӊ +Ӈ ӈ О о О̄ о̄ П п Р р Ҏ ҏ С с Т т У у +Ӯ ӯ Ф ф Х х Ц ц Ч ч Ш ш Щ щ Ъ ъ Ы ы +Ь ь Ҍ ҍ Э э Э̄ э̄ Ӭ ӭ Ю ю Ю̄ ю̄ Я я Я̄ я̄ +") + +(quail-define-rules + ("1" ?1) + ("2" ?2) + ("3" ?3) + ("4" ?4) + ("5" ?5) + ("6" ?6) + ("7" ?7) + ("8" ?8) + ("9" ?9) + ("0" ?0) + ("-" ?-) + ("=" ?ч) + ("`" ?ю) + ("-`" ["ю̄"]) + ("q" ?я) + ("-q" ["я̄"]) + ("w" ?в) + ("e" ?е) + ("-e" ["е̄"]) + ("-@" ["ё̄"]) + ("r" ?р) + ("-r" ?ҏ) + ("t" ?т) + ("y" ?ы) + ("u" ?у) + ("-u" ?ӯ) + ("i" ?и) + ("o" ?о) + ("-o" ["о̄"]) + ("p" ?п) + ("[" ?ш) + ("]" ?щ) + ("a" ?а) + ("-a" ["а̄"]) + (":a" ?ӓ) + ("s" ?с) + ("d" ?д) + ("f" ?ф) + ("g" ?г) + ("h" ?х) + ("/h" ?һ) + ("j" ?й) + ("-j" ["ӣ"]) + ("'j" ?ҋ) + ("/j" ?ј) + ("k" ?к) + ("l" ?л) + ("'l" ?ӆ) + (";" ?\;) + ("'" ?') + ("\\" ?э) + ("-\\" ["э̄"]) + (":\\" ?ӭ) + ("z" ?з) + ("x" ?ь) + ("-x" ?ҍ) + ("c" ?ц) + ("v" ?ж) + ("b" ?б) + ("n" ?н) + ("'n" ?ӊ) + ("m" ?м) + ("'m" ?ӎ) + ("," ?,) + ("." ?.) + ("/" ?/) + + ("!" ?!) + ("@" ?ё) + ("#" ?ъ) + ("$" ?Ё) + ("%" ?%) + ("^" ?^) + ("&" ?&) + ("*" ?*) + ("(" ?\() + (")" ?\)) + ("_" ?_) + ("+" ?Ч) + ("~" ?Ю) + ("-~" ["Ю̄"]) + ("Q" ?Я) + ("-Q" ["Я̄"]) + ("W" ?В) + ("E" ?Е) + ("-E" ["Е̄"]) + ("-$" ["Ё̄"]) + ("R" ?Р) + ("-R" ?Ҏ) + ("T" ?Т) + ("Y" ?Ы) + ("U" ?У) + ("-U" ["Ӯ"]) + ("I" ?И) + ("O" ?О) + ("-O" ["О̄"]) + ("P" ?П) + ("{" ?Ш) + ("}" ?Щ) + ("A" ?А) + ("-A" ["А̄"]) + (":A" ?Ӓ) + ("S" ?С) + ("D" ?Д) + ("F" ?Ф) + ("G" ?Г) + ("H" ?Х) + ("/H" ?Һ) + ("J" ?Й) + ("-J" ["Ӣ"]) + ("'J" ?Ҋ) + ("/J" ?Ј) + ("K" ?К) + ("L" ?Л) + ("'L" ?Ӆ) + (":" ?:) + ("\"" ?\") + ("|" ?Э) + ("-|" ["Э̄"]) + (":|" ?Ӭ) + ("Z" ?З) + ("X" ?Ь) + ("-X" ?Ҍ) + ("C" ?Ц) + ("V" ?Ж) + ("B" ?Б) + ("N" ?Н) + ("'N" ?Ӊ) + ("M" ?М) + ("'M" ?Ӎ) + ("<" ?<) + (">" ?>) + ("?" ??))