diff options
| author | Norbert Preining <preining@logic.at> | 2008-05-06 20:59:31 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-05-06 20:59:31 +0000 |
| commit | 894217a6241509737ba433257dc3969d6880d7e5 (patch) | |
| tree | 31276ffeb3fce6f8baed781f5df6222e577ddd58 | |
| parent | 16d27d4df6bf67377af3c47f13e433590792842b (diff) | |
uninstallation not available on win32 in GUI
git-svn-id: svn://tug.org/texlive/trunk@7901 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl | 1 | ||||
| -rwxr-xr-x | Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl | 5 |
2 files changed, 5 insertions, 1 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl index 8cc57fd95d2..699c988a89b 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl @@ -11,6 +11,7 @@ $back_f3 = $back->Frame; if ($^O=~/^MSWin(32|64)$/i) { + # this should not happen!!!! my $lab = $back_f3->Label(-justify => 'left', -text => "Start the TeX Live 2008 Uninstaller?"); diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl index 841af7c5f0f..ac2542e893e 100755 --- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl @@ -139,7 +139,10 @@ our $quit = $top->Button(-text => "Quit", # pack .top.b1 .top.b2 -side left $b1->pack(-side => 'left'); $b2->pack(-side => 'left'); -$b3->pack(-side => 'left'); +# uninstllation should not be done via tlmgr on win32 +if (!win32()) { + $b3->pack(-side => 'left'); +} $b4->pack(-side => 'left'); $b5->pack(-side => 'left'); |