diff options
| author | Norbert Preining <preining@logic.at> | 2009-02-07 23:42:14 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2009-02-07 23:42:14 +0000 |
| commit | e7da72d142aaea58f547f469cdf1068bf605a26a (patch) | |
| tree | d7fda212edcb2f0083f0025e95ca93a047eceae8 /Master/tlpkg/installer/install-menu-wizard.pl | |
| parent | a53bb5209d09e91b877edb495d027dbd502d1d60 (diff) | |
disable the switch to perltk installer in wizard
git-svn-id: svn://tug.org/texlive/trunk@12114 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-wizard.pl')
| -rw-r--r-- | Master/tlpkg/installer/install-menu-wizard.pl | 20 |
1 files changed, 12 insertions, 8 deletions
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" |