summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/lang.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index b78c7272b..0e51e7673 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -619,9 +619,9 @@ sub get_default_im {
sub set_default_im {
my ($im, @langs) = @_;
- add2hash($xim{$_}, $gtkqt_im{$im}) foreach @langs;
- add2hash($xim{$_}, { XIM_PROGRAM => $im_xim_program{$im}{$_} }) foreach @langs;
foreach (@langs) {
+ add2hash($xim{$_}, $gtkqt_im{$im});
+ add2hash($xim{$_}, { XIM_PROGRAM => $im_xim_program{$im}{$_} });
$default_im{$_}{IM} = $im foreach $_, analyse_locale_name($_)->{main};
}
}