From b8b5fb481372b5c0f3c52c871ce7c8dd910cc98b Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Thu, 7 Aug 2003 10:17:44 +0000 Subject: no, titi, I really need $widget->size_request, that's in now way equivalent to $widget->get_size_request (fixes interactive_packtable initially much too small) --- rpmdrake.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'rpmdrake.pm') diff --git a/rpmdrake.pm b/rpmdrake.pm index 7d4c8fa4..6a87546e 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -124,8 +124,10 @@ sub interactive_packtable { if_($top_label, 0, Gtk2::Label->new($top_label)), 1, create_scrolled_window($packtable), 0, gtkpack__(create_hbox(), @$action_buttons))); - my ($xpreq, $ypreq) = $packtable->get_size_request; - my ($xwreq, $ywreq) = $w->{rwindow}->get_size_request; + my $preq = $packtable->size_request; + my ($xpreq, $ypreq) = ($preq->width, $preq->height); + my $wreq = $w->{rwindow}->size_request; + my ($xwreq, $ywreq) = ($wreq->width, $wreq->height); $w->{rwindow}->set_default_size(max($typical_width, min($typical_width*2.5, $xpreq+$xwreq)), max(200, min(450, $ypreq+$ywreq))); $w->main; -- cgit v1.2.1