summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Master/tlpkg/installer/tracked-install.pl10
1 files changed, 6 insertions, 4 deletions
diff --git a/Master/tlpkg/installer/tracked-install.pl b/Master/tlpkg/installer/tracked-install.pl
index cf0e042facd..f16e15280bb 100644
--- a/Master/tlpkg/installer/tracked-install.pl
+++ b/Master/tlpkg/installer/tracked-install.pl
@@ -52,19 +52,21 @@ sub installer_tracker {
if (@::WARNLINES) {
foreach my $t (@::WARNLINES) {
- update_status ($t);
+ tlwarn ("$t\n");
}
}
if ($::env_warns) {
- update_status($::env_warns);
+ tlwarn($::env_warns);
}
$::progressw->tagConfigure('centered', -justify => 'center');
# basic welcome message
foreach my $t (@::welcome_arr) {
- #my $s = shift @$t;
- $::progressw->insert("end", "$t\n", 'centered');
+ info("$t\n");
}
$::progressw->insert("end", "\n");
+
+ do_cleanup();
+
# additional info
if ($::LOGFILENAME) {
$::progressw->insert ("end", "Logfile: $::LOGFILENAME");