summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
authorMartin Whitaker <mageia@martin-whitaker.me.uk>2019-08-10 20:40:46 +0100
committerMartin Whitaker <mageia@martin-whitaker.me.uk>2020-02-29 15:01:28 +0000
commite8f3026f210a8de175242658304c8fe83729cf5a (patch)
treeb312fb605dc23288d19f0da0234a38bd656286e8 /perl-install/partition_table.pm
parentf9a43be6ee23983c7be107a5d6a0abf5fe239aba (diff)
downloaddrakx-e8f3026f210a8de175242658304c8fe83729cf5a.tar
drakx-e8f3026f210a8de175242658304c8fe83729cf5a.tar.gz
drakx-e8f3026f210a8de175242658304c8fe83729cf5a.tar.bz2
drakx-e8f3026f210a8de175242658304c8fe83729cf5a.tar.xz
drakx-e8f3026f210a8de175242658304c8fe83729cf5a.zip
diskdrake: support adding partitions to Live ISOs on USB sticks (mga#25224)
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 230cdc6a3..6ab40174b 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -106,8 +106,10 @@ sub verifyParts {
verifyParts_(get_normal_parts($hd));
}
sub verifyPrimary {
- my ($pt) = @_;
- $_->{start} > 0 || die "partition must NOT start at sector 0" foreach @{$pt->{normal}};
+ my ($pt, $o_is_hybrid_iso) = @_;
+ if (!$o_is_hybrid_iso) {
+ $_->{start} > 0 || die "partition must NOT start at sector 0" foreach @{$pt->{normal}};
+ }
verifyParts_(@{$pt->{normal}}, $pt->{extended});
}