From 5a5ec8d18c04f2077622bce50e7024e0749e4da8 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 21 Jul 1999 16:59:18 +0000
Subject: *** empty log message ***

---
 perl-install/partition_table.pm | 3 +++
 1 file changed, 3 insertions(+)

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

diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 3ebd47122..3f46e7ea7 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -286,6 +286,9 @@ sub add($$) {
 	raw_add($hd->{primary}->{raw}, $part);
 	@{$hd->{primary}->{normal}} = $part;
     } else {
+	$hd->{primary}->{extended} && !verifyInside($part, $hd->{primary}->{extended})
+	  and die "sorry, can't add outside the main extended partition";
+
 	foreach (@{$hd->{extended}}) {
 	    $_->{normal} and next;
 	    raw_add($_->{raw}, $part);
-- 
cgit v1.2.1