summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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' ],
+ )
+ )
+ ),
);
}