diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2017-05-18 15:38:13 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2017-05-18 15:38:13 +0000 |
commit | b23fd1e83621e2219b6d556a75b8e357a3708651 (patch) | |
tree | 5786826b52db60449c6b22f5704a731cf14d6543 /Master/tlpkg/installer | |
parent | 82b7c1dbd117f698835b5685e3ebc01865314498 (diff) |
Fixes for translation welcome message
git-svn-id: svn://tug.org/texlive/trunk@44402 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer')
-rw-r--r-- | Master/tlpkg/installer/install-menu-text.pl | 5 | ||||
-rw-r--r-- | Master/tlpkg/installer/tracked-install.pl | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index 6fe12d42cd5..07268bb782b 100644 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -52,6 +52,11 @@ sub string_to_list { return split(//, $string); } +sub __ { + my $s = shift; + return sprintf($s, @_); +} + sub button { # for main menu: 1 char my $val=shift; my $vals=shift; # array ref to descriptions of possible values diff --git a/Master/tlpkg/installer/tracked-install.pl b/Master/tlpkg/installer/tracked-install.pl index bdc12e3f041..54ec22599d5 100644 --- a/Master/tlpkg/installer/tracked-install.pl +++ b/Master/tlpkg/installer/tracked-install.pl @@ -65,8 +65,8 @@ sub installer_tracker { $::progressw->tagConfigure('centered', -justify => 'center'); # basic welcome message foreach my $t (@::welcome_arr) { - my $s = shift @$t; - $::progressw->insert("end", __($s, @$t)."\n", 'centered'); + #my $s = shift @$t; + $::progressw->insert("end", "$t\n", 'centered'); } $::progressw->insert("end", "\n"); # additional info |