r14949@rob-kinyons-computer (orig r8702): rkinyon | 2007-01-24 23:08:35 -0500

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

diff --git a/t/40_freespace.t b/t/40_freespace.t
index bc8216d..7b0645d 100644 (file)
--- a/t/40_freespace.t
+++ b/t/40_freespace.t
@@ -75,7 +75,8 @@ use_ok( 'DBM::Deep' );
     # we wrote this dreck ...
     my $size = -s $filename;
     
-    my $expected = $size + 9 * ( 256 + 256 );
+    my $data_sector_size = $db->_engine->data_sector_size;
+    my $expected = $size + 9 * ( 2 * $data_sector_size );
 
     $db->{ $_ } = undef for 5 .. 17;