summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-02-02 14:02:25 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-02-02 14:02:25 +0000
commitd3c77792d4458c82943d4819e6080344151653a1 (patch)
tree7e61cc1150716ce75b2640d1b7ec92d0ad4669ba /perl-install/partition_table.pm
parent83c03c58a778b7446c222499453ba8fb307ff755 (diff)
downloaddrakx-d3c77792d4458c82943d4819e6080344151653a1.tar
drakx-d3c77792d4458c82943d4819e6080344151653a1.tar.gz
drakx-d3c77792d4458c82943d4819e6080344151653a1.tar.bz2
drakx-d3c77792d4458c82943d4819e6080344151653a1.tar.xz
drakx-d3c77792d4458c82943d4819e6080344151653a1.zip
using the new formatXiB
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index e1f7573a5..bd10c2252 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -258,16 +258,16 @@ sub verifyParts_ {
next if !$i || !$_ || $i == $_ || isWholedisk($i) || isExtended($i); #- avoid testing twice for simplicity :-)
if (isWholedisk($_)) {
verifyInside($i, $_) or
- cdie sprintf("partition sector #$i->{start} (%dMB) is not inside whole disk (%dMB)!",
- $i->{size} >> 11, $_->{size} >> 11);
+ cdie sprintf("partition sector #$i->{start} (%s) is not inside whole disk (%s)!",
+ formatXiB($i->{size}, 512), formatXiB($_->{size}, 512));
} elsif (isExtended($_)) {
verifyNotOverlap($i, $_) or
- log::l(sprintf("warning partition sector #$i->{start} (%dMB) is overlapping with extended partition!",
- $i->{size} >> 11)); #- only warning for this one is acceptable
+ log::l(sprintf("warning partition sector #$i->{start} (%s) is overlapping with extended partition!",
+ formatXiB($i->{size}, 512))); #- only warning for this one is acceptable
} else {
verifyNotOverlap($i, $_) or
- cdie sprintf("partitions sector #$i->{start} (%dMB) and sector #$_->{start} (%dMB) are overlapping!",
- $i->{size} >> 11, $_->{size} >> 11);
+ cdie sprintf("partitions sector #$i->{start} (%s) and sector #$_->{start} (%s) are overlapping!",
+ formatXiB($i->{size}, 512), formatXiB($_->{size}, 512));
}
}
}