From 7924db7d84111c753527a9fe76649d330ba1fd48 Mon Sep 17 00:00:00 2001
From: Alan Kennedy <kennedya@3dgames.com.ar>
Date: Sun, 24 Oct 2004 00:51:09 +0000
Subject: [PATCH 1/1] Bugfix

---
 inst/antifraude.pl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/inst/antifraude.pl b/inst/antifraude.pl
index 8417306..cc65421 100644
--- a/inst/antifraude.pl
+++ b/inst/antifraude.pl
@@ -72,8 +72,10 @@ sub badCall {
 }
 
 sub checkUmbrales {
-	local(*callfields) = @_[0];
-	my $callsfile = @_[1];
+	local(*callfields) = $_[0];
+	my $callsfile = $_[1];
+	print("Callfields: @callfields\n");
+	print("Callfile: $callsfile\n");
 	my $matchedUmbral = 0;
 	my $i = 0;
 
-- 
2.43.0