X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=leim-list-egg.el;h=476b27bea14b0fa19733da5479336aed053d5412;hb=39c5b2a8a5e46599d96a024949ccba89bac86b69;hp=d360439d47a8f3ffd3d40fd65b03947b3fc6dc05;hpb=ed251433bb11d5790aa07002880de16b8fedf59c;p=elisp%2Fegg.git

diff --git a/leim-list-egg.el b/leim-list-egg.el
index d360439..476b27b 100644
--- a/leim-list-egg.el
+++ b/leim-list-egg.el
@@ -1,4 +1,22 @@
 ;;; Tamago
+
 (register-input-method
- "egg-ja" "Japanese" 'egg-mode
- "A$(B$"(B"  "Romaji -> Hiragana -> Kanji&Kana")
+ "japanese-egg-wnn" "Japanese" 'egg-activate-wnn
+ "A$B$"(B"  "Romaji -> Hiragana -> Kanji&Kana")
+
+(defun egg-activate-sj3 (&optional arg)
+  (require 'egg/sj3rpc)
+  (require 'egg/sj3)
+  (setq egg-conversion-backend sj3-conversion-backend)
+  (egg-mode arg)
+  )
+
+(register-input-method
+ "japanese-egg-sj3" "Japanese" 'egg-activate-sj3
+ "A$B$"(B"  "Romaji -> Hiragana -> Kanji&Kana")
+
+(register-input-method
+ "japanese-egg" "Japanese" 'egg-mode
+ "A$B$"(B"  "Romaji -> Hiragana -> Kanji&Kana")
+
+(autoload 'egg-mode "egg" "Toggle EGG  mode." t)