From e15f321083a33732380e83e6aa2da8deac7cc154 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 28 Oct 2009 16:00:33 +0000 Subject: fix typo --- perl-install/fs/partitioning_wizard.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fs') diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 124b77ab2..4cd8f3b24 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -297,7 +297,7 @@ sub create_display_box { my $sep_count = @parts - 1; #- ratio used to compute initial partition pixel width (each partition should be > min_width) #- though, the pixel/sectors ratio can not be the same for all the partitions - my $initial_ratio = $totalsectors ? ($width - @parts * $min_width - $sep_count) / $totalsectors : 1; + my $initial_ratio = $totalsectors ? ($width - @parts * $minwidth - $sep_count) / $totalsectors : 1; my $ration = $initial_ratio; while (1) { my $totalwidth = sum(map { $_->{size} * $ratio + $minwidth } @parts); -- cgit v1.2.1