From: handa <handa>
Date: Fri, 30 May 2008 05:01:26 +0000 (+0000)
Subject: (map:enter-fullwidth-mode): Don't shift.
X-Git-Tag: REL-1-5-2~20
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=39467a6832b455b7bd294613cffd3fff1414630f;p=m17n%2Fm17n-db.git

(map:enter-fullwidth-mode): Don't shift.
(map:exit-fullwidth-mode, map:enter-single-fullwidth-mode):
Likewise.
(state:init): Add `shift' to the branch action of
exit-fullwidth-mode.
---

diff --git a/MIM/cjk-util.mim b/MIM/cjk-util.mim
index c2a55f4..3bf2cc2 100644
--- a/MIM/cjk-util.mim
+++ b/MIM/cjk-util.mim
@@ -69,17 +69,17 @@ is inserted, then the mode is turned off.
   ((Korean_Won) ?￦))
 
  (enter-fullwidth-mode
-  (">>" (shift fullwidth-mode)))
+  (">>"))
  (exit-fullwidth-mode
-  ("<<" (shift t)))
+  ("<<"))
  (enter-single-fullwidth-mode
-  ("Z" (shift single-fullwidth-mode))))
+  ("Z")))
 
 (state
  (fullwidth-mode
   "Ａ"
   (fullwidth (commit))
-  (exit-fullwidth-mode)
+  (exit-fullwidth-mode (shift t))
   (nil (unhandle)))
 
  (single-fullwidth-mode