+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
use strict;
use warnings;
-use lib 't/lib';
+
use DBICTest::RunMode;
BEGIN {
if( DBICTest::RunMode->is_plain ) {
}
}
+use DBICTest::Util 'tmpdir';
use File::Temp ();
use DBIx::Class::_Util 'scope_guard';
use DBIx::Class::Schema;
# demonstrate utter breakage of the reconnection/retry logic
#
open(my $stderr_copy, '>&', *STDERR) or die "Unable to dup STDERR: $!";
-my $tf = File::Temp->new( UNLINK => 1 );
+my $tf = File::Temp->new( UNLINK => 1, DIR => tmpdir() );
my $output;