diff lisp/egg/egg-leim.el @ 215:1f0dabaa0855 r20-4b6

Import from CVS: tag r20-4b6
author cvs
date Mon, 13 Aug 2007 10:07:35 +0200
parents e45d5e7c476e
children 262b8bb4a523
line wrap: on
line diff
--- a/lisp/egg/egg-leim.el	Mon Aug 13 10:06:48 2007 +0200
+++ b/lisp/egg/egg-leim.el	Mon Aug 13 10:07:35 2007 +0200
@@ -37,6 +37,11 @@
       (require 'egg)
     (error "Wnn is not built into this XEmacs"))
   (setq inactivate-current-input-method-function 'egg-inactivate)
+  (require 'egg-wnn)
+  (let ((func (get 'japanese 'set-egg-environ)))
+    (when func
+      (funcall func)))
+  (egg-mode)
   (toggle-egg-mode))
 
 (defun egg-inactivate ()