diff options
| author | Gwenolé Beauchesne <gbeauchesne@mandriva.org> | 2001-11-30 09:12:19 +0000 |
|---|---|---|
| committer | Gwenolé Beauchesne <gbeauchesne@mandriva.org> | 2001-11-30 09:12:19 +0000 |
| commit | 4c126c53ba97b51a89bbdca8f455bdeb7275909a (patch) | |
| tree | a460d2de4312ae3ff2cc7c4f48eecfeb0b97f0f5 | |
| parent | 6ce11f3f7d689f0677eff494b993a9f2e045b5a0 (diff) | |
| download | drakx-4c126c53ba97b51a89bbdca8f455bdeb7275909a.tar drakx-4c126c53ba97b51a89bbdca8f455bdeb7275909a.tar.gz drakx-4c126c53ba97b51a89bbdca8f455bdeb7275909a.tar.bz2 drakx-4c126c53ba97b51a89bbdca8f455bdeb7275909a.tar.xz drakx-4c126c53ba97b51a89bbdca8f455bdeb7275909a.zip | |
- cleanups from mainline
| -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); |