(egg-activate-wnn): New function.

(egg-activate-sj3): New function.
(japanese-egg-wnn): New input method.
(japanese-egg-sj3): New input method.

diff --git a/leim-list-egg.el b/leim-list-egg.el
index 00c6284..351b72b 100644 (file)
--- a/leim-list-egg.el
+++ b/leim-list-egg.el
@@ -1,4 +1,27 @@
 ;;; Tamago
+
+(defun egg-activate-wnn (&optional arg)
+  (require 'egg/wnn)
+  (require 'egg/wnnrpc)
+  (setq egg-conversion-backend wnn-conversion-backend)
+  (egg-mode arg)
+  )
+
+(register-input-method
+ "japanese-egg-wnn" "Japanese" 'egg-activate-wnn
+ "A\e$B$"\e(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\e$B$"\e(B"  "Romaji -> Hiragana -> Kanji&Kana")
+
 (register-input-method
  "japanese-egg" "Japanese" 'egg-mode
  "A\e$B$"\e(B"  "Romaji -> Hiragana -> Kanji&Kana")