diff options
author | Norbert Preining <preining@logic.at> | 2009-06-18 06:43:26 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2009-06-18 06:43:26 +0000 |
commit | 7af7021e141e0d8f197e16bb6d51f73612557749 (patch) | |
tree | 3d437ee52ab3adbbbc99d83cdcb1f221dd450bc6 /Master/tlpkg/installer/install-menu-perltk.pl | |
parent | eed6246121c1fd59b6c3afb98300d09064b30ceb (diff) |
offer TeX Works installation only on Windows
git-svn-id: svn://tug.org/texlive/trunk@13805 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-perltk.pl')
-rw-r--r-- | Master/tlpkg/installer/install-menu-perltk.pl | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl index 70643eb3594..a23d4e7bc5a 100644 --- a/Master/tlpkg/installer/install-menu-perltk.pl +++ b/Master/tlpkg/installer/install-menu-perltk.pl @@ -269,11 +269,12 @@ sub run_menu_perltk { $fr->Button(-text => $text{'toggle'}, -command => sub { toggle_and_set_opt_variable(\$vars{'option_desktop_integration'}, \$deskintyesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m"); } - $row++; - $fr->Label(-text => $labels{'addon_editor'}, -anchor => 'w')->grid(-row => $row, -column => 1, -sticky => 'w'); - $fr->Label(-anchor => 'w', -textvariable => \$editoryesno)->grid(-row => $row, -column => 2, -padx => "2m"); - $fr->Button(-text => $text{'toggle'}, -command => sub { toggle_and_set_opt_variable(\$vars{'addon_editor'}, \$editoryesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m"); - + if (win32()) { + $row++; + $fr->Label(-text => $labels{'addon_editor'}, -anchor => 'w')->grid(-row => $row, -column => 1, -sticky => 'w'); + $fr->Label(-anchor => 'w', -textvariable => \$editoryesno)->grid(-row => $row, -column => 2, -padx => "2m"); + $fr->Button(-text => $text{'toggle'}, -command => sub { toggle_and_set_opt_variable(\$vars{'addon_editor'}, \$editoryesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m"); + } # install/cancel buttons my $f3 = $fr->Frame; |