diff options
author | Norbert Preining <preining@logic.at> | 2012-05-23 02:52:48 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2012-05-23 02:52:48 +0000 |
commit | 55bc96c5305fbbbb84a8496af57335e5f7a90384 (patch) | |
tree | 7f992cf418091f63a6d2b92f3ac2c6ee3e088558 /Master | |
parent | 2fbf481079e7d6608174c4945b389b8a913811e8 (diff) |
go back to use scrolled also on windows
git-svn-id: svn://tug.org/texlive/trunk@26585 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r-- | Master/tlpkg/installer/install-menu-perltk.pl | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl index 5384e94496f..2cef2aec7e0 100644 --- a/Master/tlpkg/installer/install-menu-perltk.pl +++ b/Master/tlpkg/installer/install-menu-perltk.pl @@ -220,12 +220,16 @@ sub run_menu_perltk { $mainwindow->protocol('WM_DELETE_WINDOW' => \&menu_abort); setup_hooks_perltk(); - if (!win32()) { + # Taco once reported for 2010 that using these scrolled pane + # on Windows just died + # with the proliferation of netbooks and a new perl installed + # let us try to go back to using scrolled pane on both unix and windows + #if (!win32()) { require Tk::Pane; $subframe = $mainwindow->Scrolled("Frame", -scrollbars => "oe"); - } else { - $subframe = $mainwindow->Frame; - } + #} else { + # $subframe = $mainwindow->Frame; + #} $mw = $subframe->Frame; # image frame on the left |