diff options
| author | Pascal Terjan <pterjan@gmail.com> | 2015-04-19 22:55:57 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@gmail.com> | 2015-04-19 22:55:57 +0000 |
| commit | 8e034f26d81087858a25b15c779c536887fc95a3 (patch) | |
| tree | b2dc3a3849db777c58671042da65199785ff2f0d /perl-install/diskdrake | |
| parent | 1daabebda57976579465e5c281eaa14088e0e37f (diff) | |
| download | drakx-8e034f26d81087858a25b15c779c536887fc95a3.tar drakx-8e034f26d81087858a25b15c779c536887fc95a3.tar.gz drakx-8e034f26d81087858a25b15c779c536887fc95a3.tar.bz2 drakx-8e034f26d81087858a25b15c779c536887fc95a3.tar.xz drakx-8e034f26d81087858a25b15c779c536887fc95a3.zip | |
hide empty space < 2MB, we have such holes due to alignment (mga#15733)
Diffstat (limited to 'perl-install/diskdrake')
| -rw-r--r-- | perl-install/diskdrake/hd_gtk.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index 0fd5c598a..93625e921 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -324,7 +324,7 @@ sub create_automatic_notebooks { # parts: helpers ################################################################################ sub create_buttons4partitions { - my ($kind, $totalsectors, @parts) = @_; + my ($kind, $totalsectors, @all_parts) = @_; if ($w->{window}->get_window) { my $windowwidth = $w->{window}->get_allocated_width; @@ -332,6 +332,8 @@ sub create_buttons4partitions { $width = $windowwidth - first(get_action_box_size()) - 25; } + my @parts = grep { $_->{size} > MB(2) || !isEmpty($_) } @all_parts; + my $ratio = $totalsectors ? ($width - @parts * $minwidth) / $totalsectors : 1; my $i = 1; while ($i < 30) { |