From d676872ffcd41a4d1975c37c029a0f3bb102984f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 17 Jul 2003 19:00:42 +0000
Subject: (_create_dialog) default is "as much as needed" size

---
 perl-install/ugtk2.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 722e04769..dd547d7b8 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -345,7 +345,7 @@ sub _create_dialog {
     $dialog->signal_connect(delete_event => sub { Gtk2->main_quit });
     $dialog->set_title($title);
     $dialog->set_position('center-on-parent');  # center-on-parent doesn't work
-    $dialog->set_size_request(-1, 400) if !$o_options->{small};
+    $dialog->set_size_request(-1, $o_options->{small} ? -1 : 400);
     $dialog->set_modal(1);
     $dialog;
 }
-- 
cgit v1.2.1