diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-02-19 18:04:54 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-02-19 18:04:54 +0000 |
commit | 0fb1b32ab66047a7a4a0f68993533c50edb83a22 (patch) | |
tree | 0200952469ee98d1fc5070d18a289e69eca14fe3 /perl-install | |
parent | 25cee64b1d0707a89cfb66d2cf50caf7c72926eb (diff) | |
download | drakx-backup-do-not-use-0fb1b32ab66047a7a4a0f68993533c50edb83a22.tar drakx-backup-do-not-use-0fb1b32ab66047a7a4a0f68993533c50edb83a22.tar.gz drakx-backup-do-not-use-0fb1b32ab66047a7a4a0f68993533c50edb83a22.tar.bz2 drakx-backup-do-not-use-0fb1b32ab66047a7a4a0f68993533c50edb83a22.tar.xz drakx-backup-do-not-use-0fb1b32ab66047a7a4a0f68993533c50edb83a22.zip |
we don't need warp_text since we have WrappedLabel
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/ugtk2.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 88756f5b1..519fbb35c 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -355,7 +355,7 @@ sub create_box_with_title { my $w = $new_label->($_); $::isWizard and $w->set_justify("left"); (0, $w); - } map { ref($_) ? $_ : warp_text($_) } @_), + } @_), 1, Gtk2::HBox->new(0,0), ) ), @@ -368,7 +368,7 @@ sub create_box_with_title { my $w = $new_label->($_); $::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)), if_($a, Gtk2::HSeparator->new) ) |