diff options
-rwxr-xr-x | Master/tlpkg/installer/install-menu-text.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index 0f30955e416..58cc88130f2 100755 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -24,6 +24,11 @@ our $MENU_QUIT = 2; my $RETURN = $MENU_CONTINUE; + +# issue welcome message on end of installation +push @::end_install_hook, sub { if (win32()) { print TeXLive::TLUtils::welcome(); } else { print TeXLive::TLUtils::welcome_paths(); } }; + + sub clear_screen { return 0 if ($::opt_no_cls); (unix)? system 'clear':system 'cls'; |