From dfb93ec9c0e54c5401b905590715f258a0811f25 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 19 Oct 2001 11:50:18 +0000
Subject: add TODO for partition entry guid

---
 perl-install/partition_table_gpt.pm | 1 +
 1 file changed, 1 insertion(+)

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 {
-- 
cgit v1.2.1