From d80182fb067de110a09af88969ab9844e11ce21d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 25 Oct 1999 22:59:18 +0000
Subject: no_comment

---
 perl-install/swap.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/swap.pm')

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; }
     }
-- 
cgit v1.2.1