From b23fd1e83621e2219b6d556a75b8e357a3708651 Mon Sep 17 00:00:00 2001 From: Siep Kroonenberg Date: Thu, 18 May 2017 15:38:13 +0000 Subject: Fixes for translation welcome message git-svn-id: svn://tug.org/texlive/trunk@44402 c570f23f-e606-0410-a88d-b1316a301751 --- Master/install-tl | 32 ++++++++++------------------- Master/tlpkg/bin/tl-update-messages | 2 ++ Master/tlpkg/installer/install-menu-text.pl | 5 +++++ Master/tlpkg/installer/tracked-install.pl | 4 ++-- 4 files changed, 20 insertions(+), 23 deletions(-) diff --git a/Master/install-tl b/Master/install-tl index 7dcdc33c77f..51553c782f8 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -596,8 +596,7 @@ if ($opt_gui eq 'text' or if ($::env_warns) { print STDERR $::env_warns; } unless ($ENV{"TEXLIVE_INSTALL_NO_WELCOME"}) { foreach my $t (@::welcome_arr) { - printf STDOUT sprintf (shift @$t, @$t); - print STDOUT "\n"; + print STDOUT "$t\n"; } } do_cleanup(); # sets $::LOGFILENAME if not already defined @@ -2367,26 +2366,17 @@ EOF # sub create_welcome { @::welcome_arr = (); - push @::welcome_arr, (["\nWelcome to TeX Live!\n"]); - push @::welcome_arr, [ <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 -- cgit v1.2.3