From: morioka <morioka>
Date: Sat, 7 Feb 1998 15:31:13 +0000 (+0000)
Subject: (egg-activate-wnn): New function.
X-Git-Tag: egg-tomo-leim^2~15
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8676338b0857fbeea20718b0c5773e8276a5cf5f;p=elisp%2Fegg.git

(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
--- 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あ"  "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あ"  "Romaji -> Hiragana -> Kanji&Kana")
+
 (register-input-method
  "japanese-egg" "Japanese" 'egg-mode
  "Aあ"  "Romaji -> Hiragana -> Kanji&Kana")