diff options
author | Pascal Terjan <pterjan@gmail.com> | 2015-04-19 23:37:53 +0000 |
---|---|---|
committer | Pascal Terjan <pterjan@gmail.com> | 2015-04-20 20:45:56 +0000 |
commit | c57eea38c00d04ad3025024045a15840c62a8806 (patch) | |
tree | e85d8229866c4d62caa1f677db4d8e23bc7e3fe4 /perl-install/fs | |
parent | f8eadc36b9826e8f703ca12ea0e2b9f929b05f0e (diff) | |
download | drakx-c57eea38c00d04ad3025024045a15840c62a8806.tar drakx-c57eea38c00d04ad3025024045a15840c62a8806.tar.gz drakx-c57eea38c00d04ad3025024045a15840c62a8806.tar.bz2 drakx-c57eea38c00d04ad3025024045a15840c62a8806.tar.xz drakx-c57eea38c00d04ad3025024045a15840c62a8806.zip |
Fix ugly separator between partitions
Diffstat (limited to 'perl-install/fs')
-rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 316e2f1b9..72e3eb8f0 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -304,6 +304,7 @@ sub create_display_box { my $minwidth = 40; my $display_box = ugtk3::gtkset_size_request(Gtk3::HBox->new(0,0), -1, 26); + $display_box->set_spacing(1); my $sep_count = @parts - 1; #- ratio used to compute initial partition pixel width (each partition should be > min_width) @@ -312,7 +313,6 @@ sub create_display_box { my $vbox = Gtk3::VBox->new; - my $part_sep; my $desc; if ($resize) { @@ -411,12 +411,7 @@ sub create_display_box { ugtk3::gtkpack($display_box, $part_widget); } $part_widget->add($part_info); - - $part_sep = gtkadd(Gtk3::EventBox->new, - gtkset_size_request(Gtk3::Label->new("."), 1, 0)); - gtkpack__($display_box, $part_sep); } - $display_box->remove($part_sep) if $part_sep; unless ($resize || $fill_empty) { my @types = (N_("Ext2/3/4"), N_("XFS"), N_("Swap"), N_("Windows"), N_("Other"), N_("Empty")); |