X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F26_scalar_ref.t;h=06beda8696b7d4c1189dcdc10553d4e4032a5802;hb=58910373ba1f3191dc7ac6cadafc6e61de2e10be;hp=7a77c39dcae38080e907c4c5efc1caf75dcd9216;hpb=898fd1fd98bd753241f6db44855ea5fd6c252605;p=dbsrgits%2FDBM-Deep.git

diff --git a/t/26_scalar_ref.t b/t/26_scalar_ref.t
index 7a77c39..06beda8 100644
--- a/t/26_scalar_ref.t
+++ b/t/26_scalar_ref.t
@@ -3,11 +3,13 @@ use strict;
 use Test::More tests => 10;
 use Test::Exception;
 use File::Temp qw( tempfile tempdir );
+use Fcntl qw( :flock );
 
 use_ok( 'DBM::Deep' );
 
 my $dir = tempdir( CLEANUP => 1 );
 my ($fh, $filename) = tempfile( 'tmpXXXX', UNLINK => 1, DIR => $dir );
+flock $fh, LOCK_UN;
 
 my $x = 25;
 {