diff options
Diffstat (limited to 'perl-install/swap.pm')
| -rw-r--r-- | perl-install/swap.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/swap.pm b/perl-install/swap.pm index c14e67092..a7f122bec 100644 --- a/perl-install/swap.pm +++ b/perl-install/swap.pm @@ -92,7 +92,7 @@ sub make($;$) { } if ($checkBlocks) { - $badpages = check_blocks(\*F, $version, $nbpages); + $badpages = check_blocks(*F, $version, $nbpages); } elsif ($version == 0) { for (my $i = 0; $i < $nbpages; $i++) { vec($signature_page, $i, 1) = 1; } } |