From af508b24b15cf06813e3758754fe5bfab79ef1a1 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Fri, 14 Feb 2003 19:15:25 +0000 Subject: okcehc lrep (hebrew feeling) --- perl-install/ugtk2.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/ugtk2.pm') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 5091536b5..5d788ba3f 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -351,7 +351,7 @@ sub create_box_with_title { (map { my $w = ref($_) ? $_ : Gtk2::Label->new($_); gtkset_name($w, "Title"); - $::isWizard ? (gtkpack__(Gtk2::HBox->new(0,0), gtkset_size_request(Gtk2::Label->new, 20, 0), $w)) + $::isWizard ? gtkpack__(Gtk2::HBox->new(0,0), gtkset_size_request(Gtk2::Label->new, 20, 0), $w) : $w } map { ref($_) ? $_ : warp_text($_) } @_), if_($::isWizard, gtkset_size_request(Gtk2::Label->new, 0, 15)), -- cgit v1.2.1