diff -ru ddskk-20050123.orig/SKK-MK ddskk-20050123/SKK-MK
--- ddskk-20050123.orig/SKK-MK	2004-04-17 02:06:03.000000000 +0200
+++ ddskk-20050123/SKK-MK	2006-01-10 16:48:17.000000000 +0100
@@ -45,7 +45,13 @@
   (error "%s" "\
 This version of SKK requires MULE features"))
 
-(set-language-environment "Japanese")
+(if (and (featurep 'xemacs)
+	 (emacs-version>= 21 5 6)
+	 (getenv "LANG"))
+    (let ((old-lang (getenv "LANG")))
+      (set-language-environment "Japanese")
+      (setenv "LANG" old-lang))
+  (set-language-environment "Japanese"))
 
 ;;;; User variables to control SKK-MK.
 (defvar SKK-MK-debugging nil "*Non-nil means making verbose output.")