*** empty log message ***

[m17n/m17n-db.git] / cjk-util.mim

diff --git a/cjk-util.mim b/cjk-util.mim
index 59d9c1f..05e7f2d 100644 (file)
--- a/cjk-util.mim
+++ b/cjk-util.mim
@@ -17,17 +17,22 @@
 
 ;; 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.
-
-;;; <li> fullwidth.mim
+;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 (input-method t nil cjk-util)
 
-(title "AＡ")
+(description "Provide utilities for CJK input methods.
+This is acutually not a standalone input method, but is expected
+to be included in the other input method (e.g. zh-py).
+
+The fullwidth mode is turned on by typing \">>\", and turned off
+by typing \"<<\".
 
-(description
- "")
+The single fullwidth mode is turned on by typing \"Z\".  In this
+mode, any key typed is converted to the fullwidth character and
+is inserted, then the mode is turned off.
+")
 
 (map
  (fullwidth
@@ -68,37 +73,9 @@
  (exit-fullwidth-mode
   ("<<" (shift t)))
  (enter-single-fullwidth-mode
-  ("Z" (shift single-fullwidth-mode)))
-
- ;; Typing 1, 2, ..., 0 selects the 0th, 1st, ..., 9th candidate.
- (choose
-  ("1" (select 0))
-  ("2" (select 1))
-  ("3" (select 2))
-  ("4" (select 3))
-  ("5" (select 4))
-  ("6" (select 5))
-  ("7" (select 6))
-  ("8" (select 7))
-  ("9" (select 8))
-  ("0" (select 9)))
-
- (change-candidate
-  ((Left) (select @-))
-  ((C-b) (select @-))
-  ((Right) (select @+))
-  ((C-f) (select @+))
-  ((Up) (select @[))
-  ((C-p) (select @[))
-  ((Down) (select @]))
-  ((C-n) (select @]))))
+  ("Z" (shift single-fullwidth-mode))))
 
 (state
- (init
-  "A"
-  (enter-fullwidth-mode)
-  (enter-single-fullwidth-mode))
-
  (fullwidth-mode
   "Ａ"
   (fullwidth (commit))