| 7 |
=================================================================== |
=================================================================== |
| 8 |
--- trunk.orig/lib/setup-storage/Commands.pm |
--- trunk.orig/lib/setup-storage/Commands.pm |
| 9 |
+++ trunk/lib/setup-storage/Commands.pm |
+++ trunk/lib/setup-storage/Commands.pm |
| 10 |
@@ -860,6 +860,12 @@ |
@@ -870,6 +870,12 @@ |
| 11 |
|
|
| 12 |
# the list of partitions that must be preserved |
# the list of partitions that must be preserved |
| 13 |
my @to_preserve = &FAI::get_preserved_partitions($config); |
my @to_preserve = &FAI::get_preserved_partitions($config); |
| 20 |
|
|
| 21 |
my $label = $FAI::configs{$config}{disklabel}; |
my $label = $FAI::configs{$config}{disklabel}; |
| 22 |
$label = "gpt" if ($label eq "gpt-bios"); |
$label = "gpt" if ($label eq "gpt-bios"); |
| 23 |
@@ -870,10 +876,10 @@ |
@@ -880,10 +886,10 @@ |
| 24 |
or die "Can't change disklabel, partitions are to be preserved\n"; |
or die "Can't change disklabel, partitions are to be preserved\n"; |
| 25 |
|
|
| 26 |
# write the disklabel to drop the previous partition table |
# write the disklabel to drop the previous partition table |