(egg-activate-sj3): Moved from leim-list-egg.el.

[elisp/egg.git] / leim-list-egg.el

diff --git a/leim-list-egg.el b/leim-list-egg.el
index d360439..476b27b 100644 (file)
--- a/leim-list-egg.el
+++ b/leim-list-egg.el
@@ -1,4 +1,22 @@
 ;;; Tamago
+
 (register-input-method
- "egg-ja" "Japanese" 'egg-mode
- "A\e$(B$"\e(B"  "Romaji -> Hiragana -> Kanji&Kana")
+ "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")
+
+(autoload 'egg-mode "egg" "Toggle EGG  mode." t)