diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-10-25 22:59:18 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-25 22:59:18 +0000 |
commit | d80182fb067de110a09af88969ab9844e11ce21d (patch) | |
tree | 93726966b4a51341fca6fa8d4bc290ed35f402f1 /perl-install/swap.pm | |
parent | 31ad0827997c40a6471cbe0eddc3b89534d07323 (diff) | |
download | drakx-backup-do-not-use-d80182fb067de110a09af88969ab9844e11ce21d.tar drakx-backup-do-not-use-d80182fb067de110a09af88969ab9844e11ce21d.tar.gz drakx-backup-do-not-use-d80182fb067de110a09af88969ab9844e11ce21d.tar.bz2 drakx-backup-do-not-use-d80182fb067de110a09af88969ab9844e11ce21d.tar.xz drakx-backup-do-not-use-d80182fb067de110a09af88969ab9844e11ce21d.zip |
no_comment
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; } } |