summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-10-08 15:40:39 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-10-08 15:40:39 +0000
commitf0b965fdebde8542da2cce756b32db7ce26a8f31 (patch)
treee8fa187ed5797fea39fa205bef4b8875ffd37fa7 /perl-install/fs
parent08824dd03d0fa3afb352e8a6b7e1d35fb03cf50b (diff)
downloaddrakx-f0b965fdebde8542da2cce756b32db7ce26a8f31.tar
drakx-f0b965fdebde8542da2cce756b32db7ce26a8f31.tar.gz
drakx-f0b965fdebde8542da2cce756b32db7ce26a8f31.tar.bz2
drakx-f0b965fdebde8542da2cce756b32db7ce26a8f31.tar.xz
drakx-f0b965fdebde8542da2cce756b32db7ce26a8f31.zip
add separator between solutions
Diffstat (limited to 'perl-install/fs')
-rw-r--r--perl-install/fs/partitioning_wizard.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index f10e26f37..dad5e9d09 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -404,6 +404,7 @@ sub display_choices {
my $choicesbox = ugtk2::gtknew('VBox');
my $button;
+ my $sep;
foreach my $s (@solutions) {
my $item;
if($s eq 'free_space') {
@@ -434,7 +435,10 @@ sub display_choices {
$button?(group=>$button->get_group):());
$button->signal_connect('pressed', sub {$mainw->{sol} = $solutions{$s}; });
ugtk2::gtkpack2__($choicesbox, $button);
+ $sep = ugtk2::gtknew('HSeparator');
+ ugtk2::gtkpack2__($choicesbox, $sep);
}
+ $choicesbox->remove($sep);
ugtk2::gtkadd($contentbox, $choicesbox);
$mainw->{sol} = $solutions{@solutions[0]}
}