Commit fececd45 authored by Dave Cooper's avatar Dave Cooper

updated on the road

parent abbe3a26
......@@ -334,6 +334,17 @@
(end-of-buffer)))
;;
;; Establish input methodf I.A.S.T diacritics
;;
(load-file (concat *gendl-home* "emacs/sa-translit.el"))
(register-input-method
"sa-translit" "Sanskrit Transliteration" 'quail-use-package
"sa-translit" "Converts Harvard-Kyoto and ITRANS scheme to IAST diacritics."
(concat *gendl-home* "emacs/sa-translit.el"))
;; A. REFERENCES
;;
......
(quail-define-package
"sa-translit" "Sanskrit Transliteration" "sa-translit" t
"Insert IAST with composite key prefixes.
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("_a" ?ā)
("_A" ?Ā)
("_i" ?ī)
("_I" ?Ī)
("_u" ?ū)
("_U" ?Ū)
("!r" ?)
("_!r" ?)
("!R" ?)
("_!R" ?)
("!l" ?)
("!L" ?)
("_!l" ?)
("_!L" ?)
("!m" ?)
("!M" ?)
(".m" ?)
(".M" ?)
("!h" ?)
("!H" ?)
(".n" ?)
(".N" ?)
("~n" ?ñ)
("~N" ?Ñ)
("!t" ?)
("!T" ?)
("!d" ?)
("!D" ?)
("!n" ?)
("!N" ?)
("'s" ?ś)
("'S" ?Ś)
("!s" ?)
("!S" ?)
)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment