From 3e5df3f7bcbeda66357b2e99c19a6000807ea1d6 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 1 Aug 2003 10:09:08 +0000
Subject: create shared file if needed, remove the lock file when unlock the
 database.

---
 urpm.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/urpm.pm b/urpm.pm
index c612a0a8..754daf78 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -2484,6 +2484,11 @@ sub shlock_urpmi_db {
     #- avoid putting a require on Fcntl ':flock' (which is perl and not perl-base).
     my ($LOCK_SH, $LOCK_NB) = (1, 4);
 
+    #- create the .LOCK file if needed.
+    unless (-e "$urpm->{statedir}/.LOCK") {
+	open LOCK_FILE, ">$urpm->{statedir}/.LOCK";
+	close LOCK_FILE;
+    }
     #- lock urpmi database, but keep lock to wait for an urpmi.update to finish.
     open LOCK_FILE, "$urpm->{statedir}/.LOCK";
     flock LOCK_FILE, $LOCK_SH|$LOCK_NB or $urpm->{fatal}(7, N("urpmi database locked"));
@@ -2501,6 +2506,7 @@ sub unlock_urpmi_db {
     flock LOCK_FILE, $LOCK_UN;
     close LOCK_FILE;
 
+    unlink "$urpm->{statedir}/.LOCK";
 }
 
 sub copy_packages_of_removable_media {
-- 
cgit v1.2.1