*** empty log message ***
[m17n/m17n-db.git] / ml-itrans.mim
index 3524506..6b46650 100644 (file)
@@ -1,5 +1,5 @@
 ;; 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 "ക")
 
@@ -33,7 +35,7 @@
   (".") ("~") ("#") ("$") ("^") ("*") ((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: