From 32add8d1612f809a0185db584e0e3e9dd4794c8e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 25 Feb 2000 12:33:38 +0000
Subject: no_comment

---
 perl-install/partition_table_raw.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/partition_table_raw.pm')

diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm
index d1399f230..a6ccfdf2c 100644
--- a/perl-install/partition_table_raw.pm
+++ b/perl-install/partition_table_raw.pm
@@ -62,7 +62,7 @@ sub adjustEnd($$) {
     my $end = $part->{start} + $part->{size};
     my $end1 = round_down($end, cylinder_size($hd));
     my $end2 = round_up($end - ($hd->{geom}{heads} > 2 ? 2 : 1) * $hd->{geom}{sectors}, cylinder_size($hd));
-    $end2 <= $hd->{geom}{cylinders} * cylinder_size($hd) or die "adjustEnd go beyond end of device geometry";
+    $end2 <= $hd->{geom}{cylinders} * cylinder_size($hd) or die "adjustEnd go beyond end of device geometry ($end2 > $hd->{totalsectors})";
     $part->{size} = ($end1 - $part->{start} > cylinder_size($hd) ? $end1 : $end2) - $part->{start};
     $part->{size} > 0 or die "adjustEnd get a too small partition to handle correctly";
 }
-- 
cgit v1.2.1