From: handa <handa>
Date: Fri, 18 Jan 2008 04:11:17 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: REL-1-5-1~26
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a897d28bff8dc1da2e38d132cd8c58d390318e59;p=m17n%2Fm17n-db.git

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

diff --git a/MIM/cmc-kbd.mim b/MIM/cmc-kbd.mim
index d023598..2b20439 100644
--- a/MIM/cmc-kbd.mim
+++ b/MIM/cmc-kbd.mim
@@ -152,18 +152,18 @@
 	  (set PREV @-2)
 	  (cond ((& (>= PREV 0xAA00) (<= PREV 0xAA28))
 		 (delete @-2) (insert PM))
-		(1 (delete @-1))))
+		(1 (unhandle))))
 	 ((| (= PREV PV1) (= PREV PV2))
 	  (cond ((= @-2 PM)
 		 (cond ((& (>= @-3 0xAA00) (<= @-3 0xAA28))
 			(delete @-4)
 			(insert PREV) (insert PM))
-		       (1 (delete @-1))))
+		       (1 (unhandle))))
 		((& (>= @-2 0xAA00) (<= @-2 0xAA28))
 		 (delete @-2)
 		 (insert PREV))
-		(1 (delete @-1))))
-	 (1 (delete @-1))))
+		(1 (unhandle))))
+	 (1 (unhandle))))
 
   ((Delete)
    (set NEXT @+1)
@@ -176,8 +176,8 @@
 		       (1 (delete @+2) (insert NEXT))))
 		((| (= N2 PV1) (= N2 PV2))
 		 (delete @+2) (insert NEXT))
-		(1 (delete @+1))))
-	 (1 (delete @+1)))))
+		(1 (unhandle))))
+	 (1 (unhandle)))))
  )
 
 (state