summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-06 07:24:14 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-06 07:24:14 +0000
commit15d48009198ea46f218aa514252374a714bf5991 (patch)
tree462701f60c92739cef0a72197cc7a70ac9bcf6de /perl-install/lang.pm
parent0a5b80c81ed313183500486e0a4f30a9a4748cf7 (diff)
downloaddrakx-15d48009198ea46f218aa514252374a714bf5991.tar
drakx-15d48009198ea46f218aa514252374a714bf5991.tar.gz
drakx-15d48009198ea46f218aa514252374a714bf5991.tar.bz2
drakx-15d48009198ea46f218aa514252374a714bf5991.tar.xz
drakx-15d48009198ea46f218aa514252374a714bf5991.zip
(write) fix configuring IM
Diffstat (limited to 'perl-install/lang.pm')
-rw-r--r--perl-install/lang.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index e60cf45d0..6e8e3d5fc 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -1026,12 +1026,10 @@ sub write {
}
}
- my %conf = %{$xim{$h->{LANG}}} if $xim{$h->{LANG}};
if ($locale->{IM}) {
- delete @{$_}{qw(GTK_IM_MODULE XIM XIM_PROGRAM XMODIFIERS)} foreach $h, \%conf;
+ delete @$h{qw(GTK_IM_MODULE XIM XIM_PROGRAM XMODIFIERS)};
add2hash($h, $gtkqt_im{$locale->{IM}});
}
- add2hash($h, \%conf);
#- deactivate translations on console for RTL languages
if ($h->{LANG} =~ /ar|fa|he|ur|yi/) {