diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-09-15 22:11:31 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-09-15 22:11:31 +0000 |
commit | 9af123300c24bfe744f79b8a83cf728bf103ed76 (patch) | |
tree | 49898e9fcb5366f15ee934ddc7ee312e6ac7944d /perl-install | |
parent | 5c9a77b9408ded330cf00b68783cd33fa4132b66 (diff) | |
download | drakx-9af123300c24bfe744f79b8a83cf728bf103ed76.tar drakx-9af123300c24bfe744f79b8a83cf728bf103ed76.tar.gz drakx-9af123300c24bfe744f79b8a83cf728bf103ed76.tar.bz2 drakx-9af123300c24bfe744f79b8a83cf728bf103ed76.tar.xz drakx-9af123300c24bfe744f79b8a83cf728bf103ed76.zip |
(enteringStep): do not translate in ja|ko|zh
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_auto_install.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm index 8f0181626..d81675b31 100644 --- a/perl-install/install_steps_auto_install.pm +++ b/perl-install/install_steps_auto_install.pm @@ -74,7 +74,9 @@ sub configureNetwork { sub enteringStep { my ($o, $step) = @_; - print _("Entering step `%s'\n", translate($o->{steps}{$step}{text})); + my ($s, $t) = (__("Entering step `%s'\n"), $o->{steps}{$step}{text}); + ($s, $t) = (translate($s), translate($t)) if $ENV{LANG} !~ /ja|ko|zh/; + print sprintf($s, $t); $o->install_steps::enteringStep($step); } |