X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fmule%2Fmule-cmds.el;h=32c22ed61a3ab61ea52f4ea01d7200297c4a4ecc;hp=832bf97606447a0b0f4d266bcdea2dacce0f5091;hb=113b194be934327de99a168d809271db252c07c4;hpb=e22b5c8bdcbf854845110210456025888e130fea

diff --git a/lisp/mule/mule-cmds.el b/lisp/mule/mule-cmds.el
index 832bf97..32c22ed 100644
--- a/lisp/mule/mule-cmds.el
+++ b/lisp/mule/mule-cmds.el
@@ -390,6 +390,8 @@ The return value is a string."
 					nil t nil 'input-method-history)
 		       ;;default)
 		       ))
+    (if (string-equal input-method "")
+	(setq input-method default))
     (if (> (length input-method) 0)
 	input-method
       (if inhibit-null