diff options
| -rw-r--r-- | perl-install/common.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index 014aade79..dafa208dd 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -58,7 +58,7 @@ sub unmakedev { $_[0] >> 8, $_[0] & 0xff } sub translate_real { my ($s) = @_; $s or return ''; - foreach ('libDrakX', @::textdomains) { + foreach (@::textdomains, 'libDrakX') { my $s2 = c::dgettext($_, $s); return $s2 if $s ne $s2; } |