new installer features: est. remaining time, GUI progress bar

git-svn-id: svn://tug.org/texlive/trunk@11328 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 1 insertions, 13 deletions

diff --git a/Master/install-tl b/Master/install-tl
index f09d80f128b..ed438e7f8aa 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -268,10 +268,7 @@ my $location;
 
 # $finished == 1 if the menu call already did the installation
 my $finished = 0;
-@::start_install_hook = ();
-@::end_install_hook = ();
-@::start_postinst_hook = ();
-@::start_install_hook = ();
+@::info_hook = ();
 
 my $system_tmpdir=get_system_tmpdir();
 my $media;
@@ -481,9 +478,6 @@ exit(0);
 sub do_installation {
   # do the actual installation
   my $h;
-  foreach $h (@::start_install_hook) {
-    &$h();
-  }
   prepare_installation();
   if (!$vars{'from_dvd'}) {
     calc_depends();
@@ -518,9 +512,6 @@ sub do_installation {
     create_uninstaller($vars{'TEXDIR'}, $vars{'TEXDIRW'},
       $vars{'TEXMFSYSVAR'}, $vars{'TEXMFSYSCONFIG'});
   }
-  foreach $h (@::start_postinst_hook) {
-    &$h();
-  }
   do_postinst_stuff();
   # now we save every scheme that is fully covered by the stuff we have
   # installed to the $localtlpdb
@@ -539,9 +530,6 @@ sub do_installation {
     }
   }
   $localtlpdb->save unless $vars{'from_dvd'};
-  foreach $h (@::end_install_hook) {
-    &$h();
-  }
 }
 
 sub dump_vars {