diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-08-28 21:16:32 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-08-28 21:16:32 +0000 |
| commit | ff872004f6d5f202a6a8cd418bad3b2458d2ed66 (patch) | |
| tree | 984a3ea576f9090b2aad069550b65a6595c04d4c /perl-install/common.pm | |
| parent | c047aee8e84b723f6910defab8b0de8063502490 (diff) | |
| download | drakx-backup-do-not-use-ff872004f6d5f202a6a8cd418bad3b2458d2ed66.tar drakx-backup-do-not-use-ff872004f6d5f202a6a8cd418bad3b2458d2ed66.tar.gz drakx-backup-do-not-use-ff872004f6d5f202a6a8cd418bad3b2458d2ed66.tar.bz2 drakx-backup-do-not-use-ff872004f6d5f202a6a8cd418bad3b2458d2ed66.tar.xz drakx-backup-do-not-use-ff872004f6d5f202a6a8cd418bad3b2458d2ed66.zip | |
no_comment
Diffstat (limited to 'perl-install/common.pm')
| -rw-r--r-- | perl-install/common.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index 1be6d4f95..851cf6971 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -346,7 +346,10 @@ sub translate { require lang; foreach (split ':', $lang) { lang::load_po($_) unless defined $po::I18N::{$_}; - return ${$po::I18N::{$_}}{$s} || $s if %{$po::I18N::{$_}}; + if (%{$po::I18N::{$_}}) { + return if $s eq '_I18N_'; + return ${$po::I18N::{$_}}{$s} || $s + } } $s; } |