From e2ed8189e9411a9e71c5cbbc19ab6b2d4b8c6eec Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dag-Erling=20Sm=C3=B8rgrav?= <des@FreeBSD.org>
Date: Tue, 21 Mar 2006 08:08:58 +0000
Subject: [PATCH] Open the lock file write-only.

---
 tools/tools/tinderbox/tbmaster.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/tools/tinderbox/tbmaster.pl b/tools/tools/tinderbox/tbmaster.pl
index 375302261a7a..12dbc057b8a6 100644
--- a/tools/tools/tinderbox/tbmaster.pl
+++ b/tools/tools/tinderbox/tbmaster.pl
@@ -575,7 +575,7 @@ MAIN:{
 	    die("invalid lockfile\n");
 	}
 	$lockfile = $1;
-	$lock = open_locked($lockfile, O_CREAT, 0600)
+	$lock = open_locked($lockfile, O_WRONLY|O_CREAT, 0600)
 	    or die("unable to acquire lock on $lockfile\n");
 	# Lock will be released upon termination.
     }