Author: timbo Date: Tue Nov 24 05:54:01 2009 New Revision: 13595 Modified: dbi/trunk/t/10examp.t
Log: Provide some protection against growth in size of '.' while running t/10examp.t which was probable cause of http://www.nntp.perl.org/group/perl.cpan.testers/2009/09/msg5297317.html Modified: dbi/trunk/t/10examp.t ============================================================================== --- dbi/trunk/t/10examp.t (original) +++ dbi/trunk/t/10examp.t Tue Nov 24 05:54:01 2009 @@ -14,6 +14,16 @@ use Test::More tests => 210; +do { + # provide some protection against growth in size of '.' during the test + # which was probable cause of this failure + # http://www.nntp.perl.org/group/perl.cpan.testers/2009/09/msg5297317.html + my $tmpfile = "deleteme"; + open my $fh, ">$tmpfile"; + close $fh; + unlink $tmpfile; +}; + # "globals" my ($r, $dbh);
