From eeb1a66eaf3974b02ba19fbc15a9af3c93500d7a Mon Sep 17 00:00:00 2001 From: damien Date: Wed, 27 Sep 2000 10:28:45 +0000 Subject: stc --- perl-install/interactive_gtk.pm | 1 - 1 file changed, 1 deletion(-) (limited to 'perl-install/interactive_gtk.pm') diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index bd2063717..c4f83efa9 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -40,7 +40,6 @@ sub ask_from_list_with_helpW { my $w = my_gtk->new(first(deref($title)), %$o); #gtkset_usize(createScrolledWindow($tree), 300, min(350, $::windowheight - 60)), $w->{retval} = $def || $l->[0]; #- nearly especially for the X test case (see timeout in Xconfigurator.pm) - $w->{rwindow}->set_position('center_always') if $::isStandalone; $w->{rwindow}->set_policy(0, 0, 1) if $::isWizard; if (@$l < 5 or $::isWizard) { my $defW; -- cgit v1.2.1