X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F52_memory_leak.t;h=2f5a59303266b14e2d4612f1080f1008ad1c57aa;hb=33d7395d5a547dbfa64f0bcf3a42f04cd84db1dc;hp=b24401b85a3ad7180425c834f55273c28d7ada70;hpb=7223385ad9d3b2c0caf0798b72b0ac235890404b;p=dbsrgits%2FDBM-Deep.git

diff --git a/t/52_memory_leak.t b/t/52_memory_leak.t
index b24401b..2f5a593 100644
--- a/t/52_memory_leak.t
+++ b/t/52_memory_leak.t
@@ -14,7 +14,7 @@ plan skip_all => "Need to figure out what platforms this runs on";
 use t::common qw( new_fh );
 
 my ($fh, $filename) = new_fh();
-my $db = DBM::Deep->new( file => $filename, fh => $fh, );
+my $db = DBM::Deep->new( $filename );
 
 my $todo  = 1000;
 my $allow = $todo*0.02; # NOTE: a 2% fail rate is hardly a failure