diff options
Diffstat (limited to 'perl-install/partition_table_gpt.pm')
| -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 4a0514d8e..6860dd591 100644 --- a/perl-install/partition_table_gpt.pm +++ b/perl-install/partition_table_gpt.pm @@ -64,6 +64,7 @@ $_ = join('', @$_) foreach $main_format, $partitionEntry_format, $guid_format; my $magic = "EFI PART"; sub generate_guid { + my $tmp; local *F; open F, devices::make("random") or die "Could not open /dev/random for GUID generation"; read F, $tmp, psizeof($guid_format); |