;; ml-itrans.mim -- Malayalam input method with ITRANS method
-;; Copyright (C) 2003, 2004
+;; Copyright (C) 2003, 2004, 2005, 2006
;; National Institute of Advanced Industrial Science and Technology (AIST)
;; Registration Number H15PRO112
;; You should have received a copy of the GNU Lesser General Public
;; License along with the m17n library; if not, write to the Free
-;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-;; 02111-1307, USA.
+;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
-;;; <li> ml-itrans.mim
-;;;
-;;; Input method for Malayalam script with ITRANS method. For the
-;;; detail of ITRANS, see the page http://www.aczoom.com/itrans/.
+(input-method ml itrans)
+
+(description "Malayalam input method by ITRANS transliteration.
+For the detail of ITRANS, see the page:
+ <http://www.aczoom.com/itrans/>
+")
(title "ക")
(".") ("~") ("#") ("$") ("^") ("*") ((S-\ )) ((C-@))
("0") ("1") ("2") ("3") ("4")
("5") ("6") ("7") ("8") ("9")
- ("A") ("C") ("D") ("G") ("H") ("I") ("J") ("K") ("L")
+ ("A") ("C") ("D") ("E") ("G") ("H") ("I") ("J") ("K") ("L")
("M") ("N") ("O") ("R") ("S") ("T") ("U") ("Y")
("a") ("b") ("c") ("d") ("e") ("f") ("g") ("h") ("i")
("j") ("k") ("l") ("m") ("n") ("o") ("p") ("q") ("r")
("R^i" "ഋ")
("LLi" "ഌ")
("L^i" "ഌ")
- ("E" "ഏ")
("e" "എ")
+ ("E" "ഏ")
+ ("ee" "ഏ")
("ai" "ഐ")
- ("O" "ഓ")
("o" "ഒ")
+ ("oo" "ഓ")
+ ("O" "ഓ")
("au" "ഔ")
(".n" "ം")
("M" "ം")
("R^i" (delete @-) "ൃ")
("LLi" (delete @-) "")
("L^i" (delete @-) "")
- ("E" (delete @-) "േ")
("e" (delete @-) "െ")
+ ("ee" (delete @-) "േ")
+ ("E" (delete @-) "േ")
("ai" (delete @-) "ൈ")
- ("O" (delete @-) "ോ")
("o" (delete @-) "ൊ")
+ ("oo" (delete @-) "ോ")
+ ("O" (delete @-) "ോ")
("au" (delete @-) "ൌ"))
(return
(intermediate
(consonant (shift second))
- (independent (shift finish))
+ (independent (shift init))
(backspace)
(return (shift init)))
(second
(consonant)
- (dependent (shift finish))
+ (dependent (shift init))
(backspace)
- (return (shift init)))
-
- (finish
- (return)
- (t (shift init))))
+ (return (shift init))))
;; Local Variables:
;; coding: utf-8
-;; mode: lisp
+;; mode: emacs-lisp
;; End: