From 4774adf60a1e77cf2f57e03f09c42e772e83e59e Mon Sep 17 00:00:00 2001
From: Alan Kennedy <kennedya@3dgames.com.ar>
Date: Sun, 24 Oct 2004 02:20:25 +0000
Subject: [PATCH] Fix en locking

---
 inst/antifraude.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/inst/antifraude.pl b/inst/antifraude.pl
index 47ffc42..e2d09c1 100644
--- a/inst/antifraude.pl
+++ b/inst/antifraude.pl
@@ -155,7 +155,8 @@ if ((!$ARGV[0]) || (! -d $ARGV[0])) {
 	exit 1;
 }
 
-# Lock file
+# File locking..
+if (is_lock()) { exit 1; }
 lock();
 
 # Defino some GLOBALS
-- 
2.43.0