diff options
Diffstat (limited to 'perl-install/bootloader.pm')
| -rw-r--r-- | perl-install/bootloader.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 48879cf31..91691d0ea 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -591,7 +591,7 @@ sub get_of_dev { run_program::rooted_or_die($::prefix, "/usr/sbin/ofpath $unix_dev", ">", "/tmp/ofpath"); open(FILE, "$::prefix/tmp/ofpath") || die "Can't open $::prefix/tmp/ofpath"; my $of_dev = ""; - local $_ = ""; + local $_; while (<FILE>){ $of_dev = $_; } |