diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-23 16:10:03 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-23 16:10:03 +0000 |
commit | d6f5330ee63311a3e5c8ef52693ac7193ea83ede (patch) | |
tree | 597f252be23c47345b40109c08f58b8fa849b524 /perl-install/partition_table.pm | |
parent | 9731f6a53e8701039a1fa0102427fbdd5eb60df0 (diff) | |
download | drakx-backup-do-not-use-d6f5330ee63311a3e5c8ef52693ac7193ea83ede.tar drakx-backup-do-not-use-d6f5330ee63311a3e5c8ef52693ac7193ea83ede.tar.gz drakx-backup-do-not-use-d6f5330ee63311a3e5c8ef52693ac7193ea83ede.tar.bz2 drakx-backup-do-not-use-d6f5330ee63311a3e5c8ef52693ac7193ea83ede.tar.xz drakx-backup-do-not-use-d6f5330ee63311a3e5c8ef52693ac7193ea83ede.zip |
perl_checker fixes
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r-- | perl-install/partition_table.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index 5c50333dc..6da5256e5 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -709,7 +709,7 @@ The only solution is to move your primary partitions to have the hole next to th my $l = first(@{$hd->{extended}}); #- the first is a special case, must recompute its real size - $l->{start} = round_down($l->{normal}{start} - 1, $hd->cylinder_size()); + $l->{start} = round_down($l->{normal}{start} - 1, $hd->cylinder_size); $l->{size} = $l->{normal}{start} + $l->{normal}{size} - $l->{start}; my $ext = { %$l }; unshift @{$hd->{extended}}, { type => 5, raw => [ $part, $ext, {}, {} ], normal => $part, extended => $ext }; |