X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcommon.pm;fp=t%2Fcommon.pm;h=135ed663fa9183aa1110dc363ded0dd279386f40;hb=345e7fd079ea47414f8d2601e47689a0dbd16c97;hp=97cd1c926a640bb95e4231ed335a31480e19bdee;hpb=616df1beae2badc2609dbddb66f4a8bbe1ec2c02;p=dbsrgits%2FDBM-Deep.git diff --git a/t/common.pm b/t/common.pm index 97cd1c9..135ed66 100644 --- a/t/common.pm +++ b/t/common.pm @@ -18,7 +18,7 @@ use File::Temp qw( tempfile tempdir ); use Fcntl qw( :flock ); my $parent = $ENV{WORK_DIR} || File::Spec->tmpdir; -my $dir = tempdir( CLEANUP => 1, DIR => $parent ); +our $dir = tempdir( CLEANUP => 1, DIR => $parent ); #my $dir = tempdir( DIR => '.' ); sub new_fh {