diff options
| -rw-r--r-- | perl-install/partition_table_gpt.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/partition_table_gpt.pm b/perl-install/partition_table_gpt.pm index fa9668fd8..134389cd8 100644 --- a/perl-install/partition_table_gpt.pm +++ b/perl-install/partition_table_gpt.pm @@ -147,6 +147,7 @@ sub write { foreach (@$pt) { $_->{ending} = $_->{start} + $_->{size}; + $_->{guid} ||= 'TODO'; $_->{gpt_type} = $gpt_types{$_->{type}} || $_->{gpt_type} || $gpt_types{0x83}; } my $partitionEntries = join('', map { |