From: 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/gitweb/?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