r592@rob-kinyons-computer-2 (orig r10555): rkinyon | 2008-01-15 14:19:42 -0500

[dbsrgits/DBM-Deep.git] / t / 40_freespace.t

diff --git a/t/40_freespace.t b/t/40_freespace.t
index 7b0645d..d242710 100644 (file)
--- a/t/40_freespace.t
+++ b/t/40_freespace.t
@@ -12,6 +12,7 @@ use_ok( 'DBM::Deep' );
     my ($fh, $filename) = new_fh();
     my $db = DBM::Deep->new({
         file => $filename,
+        fh => $fh,
         autoflush => 1,
     });
 
@@ -63,6 +64,7 @@ use_ok( 'DBM::Deep' );
     my ($fh, $filename) = new_fh();
     my $db = DBM::Deep->new({
         file => $filename,
+        fh => $fh,
         autoflush => 1,
     });
 
@@ -74,7 +76,7 @@ use_ok( 'DBM::Deep' );
     # trigger a reindex. This requires knowing how much space is taken. Good thing
     # we wrote this dreck ...
     my $size = -s $filename;
-    
+
     my $data_sector_size = $db->_engine->data_sector_size;
     my $expected = $size + 9 * ( 2 * $data_sector_size );