From 49790b1e7e8fed6b7735c3f57813c932ea5e3317 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 9 Sep 2004 09:41:34 +0000 Subject: fix thai IM that was broken for ages (but it was disabled in 10.0 anyway so ...) --- perl-install/lang.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 74a933ce3..ce2d29709 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -1017,7 +1017,7 @@ sub write { } - add2hash($h, $IM_locale_specific_config{$locale->{lang}}); + add2hash($h, $IM_locale_specific_config{$h->{LANG}}); $h->{ENC} = $locale2encoding{$locale->{lang}}; $h->{ENC} = 'utf8' if member($locale->{lang}, qw(ja_JP.UTF-8 ko_KR.UTF-8 zh_CN.UTF-8 zh_HK.UTF-8 zh_SG.UTF-8 zh_TW.UTF-8)); -- cgit v1.2.1