summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2010-01-07 16:16:22 +0000
committerNorbert Preining <preining@logic.at>2010-01-07 16:16:22 +0000
commitcb974c95b5225526184223ae15a88479d252e122 (patch)
tree52e7a83ed4696e10a365febff44dc0b516b6ed62 /Master/texmf
parentf3d74515a3519965610afcbeeacd259600a6917f (diff)
allow resizing the log window with a resizer
git-svn-id: svn://tug.org/texlive/trunk@16631 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rw-r--r--Master/texmf/scripts/texlive/tlmgrgui.pl20
1 files changed, 15 insertions, 5 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui.pl
index df7d90c7682..cdf7a53c1fa 100644
--- a/Master/texmf/scripts/texlive/tlmgrgui.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui.pl
@@ -18,6 +18,7 @@ use strict;
use Tk;
use Tk::Dialog;
+use Tk::Adjuster;
use Tk::BrowseEntry;
use Tk::ROText;
use Tk::HList;
@@ -213,7 +214,10 @@ sub build_initial_gui {
sub do_rest_of_gui {
# This needs to come first as we call update_grid rather early
#my $list_frame = $mw->Labelframe(-text => "Packages");
- my $list_frame = $mw->Frame;
+ my $gf = $mw->Frame;
+
+ #my $list_frame = $mw->Frame;
+ my $list_frame = $gf->Frame;
$g = $list_frame->Scrolled('HList', -scrollbars => "se", -bd => 0,
-command => \&show_extended_info, # does not work, double click!
-columns => 5, -header => 1,
@@ -230,7 +234,8 @@ sub do_rest_of_gui {
$loaded_button->pack(-anchor => 'e', -padx => 0, -pady => 0,
-ipadx => 0, -ipady => 0);
- my $top_frame = $mw->Labelframe(-text => __("Display configuration"));
+ #my $top_frame = $mw->Labelframe(-text => __("Display configuration"));
+ my $top_frame = $gf->Labelframe(-text => __("Display configuration"));
my $filter_frame = $top_frame->Frame();
$filter_frame->pack;
@@ -322,7 +327,8 @@ $g->headerCreate(4, @htype, -itemtype => 'text', -text => __("Short description"
$g->columnWidth(2, -char => 20);
$g->columnWidth(3, -char => 20);
- my $bot_frame = $mw->Frame;
+ my $bot_frame = $gf->Frame;
+ #my $bot_frame = $mw->Frame;
my $actions_frame = $bot_frame->Frame;
$actions_frame->pack();
@@ -359,11 +365,15 @@ $g->headerCreate(4, @htype, -itemtype => 'text', -text => __("Short description"
-command => sub { backup_selected_packages(); }
)->pack(@left, @p_ii);
-
-
$top_frame->pack(-fill => 'x', -padx => '2m');
$bot_frame->pack(-fill => 'x', @p_ii, -side => 'bottom');
$list_frame->pack(@x_xy, @p_ii);
+
+ $mw->Adjuster(-widget => $::progressw, -side => 'bottom')
+ ->pack(-side => 'bottom', -fill => 'x');
+
+ $gf->pack(-side => 'top', -fill => 'both', -expand => 1);
+
}
########### LOGGING ETC FUNCTIONS #############