From: handa <handa>
Date: Mon, 5 Oct 2009 10:40:20 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e7919a3da0cb213cfe95bb8c7ac561c09797cdae;p=m17n%2Fm17n-lib-cs.git

*** empty log message ***
---

diff --git a/MInputMethod.cs b/MInputMethod.cs
index 3909bba..da100dc 100644
--- a/MInputMethod.cs
+++ b/MInputMethod.cs
@@ -1748,7 +1748,7 @@ namespace M17N.Input
       return new Xex.Term (domain, (Xex.Symbol) Mcond.Name, args);
     }
 
-    private Xex.Term parse_integer (MPlist plist)
+    private Xex.Term parse_insert (MPlist plist)
     {
       if (plist.IsSymbol)
 	{
@@ -1786,7 +1786,9 @@ namespace M17N.Input
 	  p = p.next;
 	  if (name == Mcond)
 	    return parse_cond (p);
-	  else if (name == Mset || name == Madd || name == Msub
+	  if (name == Minsert)
+	    return parse_integer (p);
+	  if (name == Mset || name == Madd || name == Msub
 		   || name == Mmul || name == Mdiv)
 	    {
 	      if (! p.IsSymbol)