Mercurial > emacs

comparison leim/quail/indian.el @ 98923:a0675998d249

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(inscript-mlm-keytable): New variable. (malayalam-inscript): Use inscript-mlm-keytable.
author Kenichi Handa <handa@m17n.org>
date Mon, 20 Oct 2008 07:39:31 +0000
parents 4f1fd208c354
children 0d2e4142fb60
comparison
equal deleted inserted replaced
98922:124674d7af1d 98923:a0675998d249
176 (;; Digits 176 (;; Digits
177 ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9) 177 ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9)
178 (;; Inscripts 178 (;; Inscripts
179 ?# ?$ ?^ ?* ?\]))) 179 ?# ?$ ?^ ?* ?\])))
180 180
181 (defvar inscript-mlm-keytable
182 '(
183 (;; VOWELS (18)
184 (?D nil) (?E ?e) (?F ?f) (?R ?r) (?G ?g) (?T ?t)
185 (?+ ?=) ("F]" "f]") (?! ?@) (?S ?s) (?Z ?z) (?W ?w)
186 (?| ?\\) (?~ ?`) (?A ?a) (?Q ?q) ("+]" "=]") ("R]" "r]"))
187 (;; CONSONANTS (42)
188 ?k ?K ?i ?I ?U ;; GRUTTALS
189 ?\; ?: ?p ?P ?} ;; PALATALS
190 ?' ?\" ?\[ ?{ ?C ;; CEREBRALS
191 ?l ?L ?o ?O ?v ?V ;; DENTALS
192 ?h ?H ?y ?Y ?c ;; LABIALS
193 ?/ ?j ?J ?n ?N "N]" ?b ;; SEMIVOWELS
194 ?M ?< ?m ?u ;; SIBILANTS
195 "k]" "K]" "i]" "p]" "[]" "{]" "H]" "/]" ;; NUKTAS
196 ?% ?&)
197 (;; Misc Symbols (7)
198 ?X ?x ?_ ">]" ?d "X]" ?>)
199 (;; Digits
200 ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9)
201 (;; Inscripts
202 ?# ?$ ?^ ?* ?\])))
203
181 (defvar inscript-tml-keytable 204 (defvar inscript-tml-keytable
182 '( 205 '(
183 (;; VOWELS (18) 206 (;; VOWELS (18)
184 (?D nil) (?E ?e) (?F ?f) (?R ?r) (?G ?g) (?T ?t) 207 (?D nil) (?E ?e) (?F ?f) (?R ?r) (?G ?g) (?T ?t)
185 nil nil nil (?S ?s) (?Z ?z) (?W ?w) 208 nil nil nil (?S ?s) (?Z ?z) (?W ?w)
258 "Kannada keyboard Inscript.") 281 "Kannada keyboard Inscript.")
259 282
260 (if nil 283 (if nil
261 (quail-define-package "malayalam-inscript" "Malayalam" "MlmIS" t "Malayalam keyboard Inscript")) 284 (quail-define-package "malayalam-inscript" "Malayalam" "MlmIS" t "Malayalam keyboard Inscript"))
262 (quail-define-inscript-package 285 (quail-define-inscript-package
263 indian-mlm-base-table inscript-dev-keytable 286 indian-mlm-base-table inscript-mlm-keytable
264 "malayalam-inscript" "Malayalam" "MlmIS" 287 "malayalam-inscript" "Malayalam" "MlmIS"
265 "Malayalam keyboard Inscript.") 288 "Malayalam keyboard Inscript.")
266 289
267 (if nil 290 (if nil
268 (quail-define-package "tamil-inscript" "Tamil" "TmlIS" t "Tamil keyboard Inscript")) 291 (quail-define-package "tamil-inscript" "Tamil" "TmlIS" t "Tamil keyboard Inscript"))