From 2e94ef6fca25b33c6e70d99b32536c1a461c7c4e Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 15 Mar 2007 17:03:49 +0000 Subject: (init) size window rather than progressbar and increase default size in order to prevent resizing --- Rpmdrake/gurpm.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Rpmdrake/gurpm.pm b/Rpmdrake/gurpm.pm index 7d66e8fc..b10ca373 100755 --- a/Rpmdrake/gurpm.pm +++ b/Rpmdrake/gurpm.pm @@ -35,11 +35,11 @@ my $previous_main_window; sub init { my ($title, $initializing, %options) = @_; - $mainw = ugtk2->new($title, %options); + $mainw = ugtk2->new($title, %options, default_width => 600); $previous_main_window = $::main_window; $::main_window = $mainw->{real_window}; $label = gtknew('Label', text => $initializing); - $progressbar = gtknew('ProgressBar', width => 300); + $progressbar = gtknew('ProgressBar'); gtkadd($mainw->{window}, $vbox = gtknew('VBox', spacing => 5, border_width => 6, children_tight => [ $label, $progressbar ])); $mainw->{rwindow}->set_position('center-on-parent'); $mainw->sync; -- cgit v1.2.1