summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer/install-menu-text.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-02-03 12:56:24 +0000
committerNorbert Preining <preining@logic.at>2009-02-03 12:56:24 +0000
commitf0f383b043500d3449eed46c1ee1fd8dced513d7 (patch)
treee45c5ca94769b2996e6109f2c379f6c983402301 /Master/tlpkg/installer/install-menu-text.pl
parentfcc121fbd794ac2f5dcec86ca94ddc5e0dea17ee (diff)
rework install logic so that we can switch over to the GUI from wizard
without all those warnings about redefined subs git-svn-id: svn://tug.org/texlive/trunk@12062 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-text.pl')
-rwxr-xr-xMaster/tlpkg/installer/install-menu-text.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl
index d9869d80501..87c99474789 100755
--- a/Master/tlpkg/installer/install-menu-text.pl
+++ b/Master/tlpkg/installer/install-menu-text.pl
@@ -108,14 +108,14 @@ sub prompt {
# The menu loop. A menu is a function. Its return value is a
# reference to another menu or to itself.
-sub run_menu {
+sub run_menu_text {
my $menu=\&main_menu;
while ($RETURN == $MENU_CONTINUE) {
$menu=$menu->();
}
return($RETURN);
}
-
+$::run_menu = \&run_menu_text;
sub binary_menu {
my %command=(