summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-08 17:04:41 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-08 17:04:41 +0000
commit4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb (patch)
tree323bd082e87dad3e70be2cd150c8cbe3e4072e02
parentcb72821b673bd77b5b136bac22fe8b38a9f5052b (diff)
downloaddrakx-4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb.tar
drakx-4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb.tar.gz
drakx-4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb.tar.bz2
drakx-4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb.tar.xz
drakx-4864f1a708acc8cf939fcd2ddff6d8c91ca2b6cb.zip
add a separator below buttons on fredc request
-rw-r--r--perl-install/ugtk2.pm29
1 files changed, 16 insertions, 13 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 3b303c71c..c9089a78c 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -521,19 +521,22 @@ sub create_okcancel {
@last = ($wm_is_kde ? $bprev : $bok);
}
- gtkpack(Gtk2::HBox->new,
- (map {
- gtkpack(
- create_hbox($_->[1]),
- (map {
- $_->can_default($::isWizard);
- $_;
- } grep { $_ } @{$_->[0]})
- )
- } ([ \@first, 'start' ],
- [ \@last, 'end' ],
- )
- )
+ gtkpack(Gtk2::VBox->new,
+ Gtk2::HSeparator->new,
+ gtkpack(Gtk2::HBox->new,
+ (map {
+ gtkpack(
+ create_hbox($_->[1]),
+ (map {
+ $_->can_default($::isWizard);
+ $_;
+ } grep { $_ } @{$_->[0]})
+ )
+ } ([ \@first, 'start' ],
+ [ \@last, 'end' ],
+ )
+ )
+ ),
);
}