From e7da72d142aaea58f547f469cdf1068bf605a26a Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 7 Feb 2009 23:42:14 +0000 Subject: disable the switch to perltk installer in wizard git-svn-id: svn://tug.org/texlive/trunk@12114 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/installer/install-menu-wizard.pl | 20 ++++++++++++-------- 1 file changed, 12 insertions(+), 8 deletions(-) (limited to 'Master/tlpkg/installer/install-menu-wizard.pl') diff --git a/Master/tlpkg/installer/install-menu-wizard.pl b/Master/tlpkg/installer/install-menu-wizard.pl index cb19751bb6e..f5e779d64a8 100644 --- a/Master/tlpkg/installer/install-menu-wizard.pl +++ b/Master/tlpkg/installer/install-menu-wizard.pl @@ -184,13 +184,17 @@ sub ask_path { my $pa = $fmain->Checkbutton(-text => $labels{'optletter'}, -variable => \$vars{"option_letter"}); - my $cb = $fmain->Button(-text => $text{'advcustom'}, - -relief => "ridge", - -command => sub { $mw->destroy; - require("installer/install-menu-perltk.pl"); - setup_hooks_perltk(); - $return = run_menu_perltk(); - }); + # + # disable the "Advanced Configuration" button switching to the + # perltk installer + # + #my $cb = $fmain->Button(-text => $text{'advcustom'}, + # -relief => "ridge", + # -command => sub { $mw->destroy; + # require("installer/install-menu-perltk.pl"); + # setup_hooks_perltk(); + # $return = run_menu_perltk(); + # }); calc_depends(); @@ -214,7 +218,7 @@ sub ask_path { $pa->place(-x => 0, -y => $ytmp + 30); - $cb->place(-x => $INNERWIDTH, -y => $INNERHEIGHT, -anchor => "se"); + #$cb->place(-x => $INNERWIDTH, -y => $INNERHEIGHT, -anchor => "se"); $fmain->Label(-text => "$text{'diskreq'}: $vars{'total_size'} MB", -justify => "left" -- cgit v1.2.3