Minor cleanups

diff --git a/lib/DBM/Deep.pod b/lib/DBM/Deep.pod
index 701c70b..1fd95c2 100644 (file)
--- a/lib/DBM/Deep.pod
+++ b/lib/DBM/Deep.pod
@@ -227,9 +227,10 @@ space in it.
 The default for this is 64 bytes. The minimum value is 32 and the maximum is
 256 bytes.
 
-B<Note:> There are between 5 and 9 bytes taken up in each data sector for
-bookkeeping. (It's 3 + the number of bytes in your L</pack_size>.) This is
-included within the data_sector_size.
+B<Note:> There are between 6 and 10 bytes taken up in each data sector for
+bookkeeping. (It's 4 + the number of bytes in your L</pack_size>.) This is
+included within the data_sector_size, thus the effective value is 6-10 bytes
+less than what you specified.
 
 =item * pack_size
 

diff --git a/lib/DBM/Deep/Engine.pm b/lib/DBM/Deep/Engine.pm
index 4f4e286..d631851 100644 (file)
--- a/lib/DBM/Deep/Engine.pm
+++ b/lib/DBM/Deep/Engine.pm
@@ -1029,7 +1029,7 @@ sub _init {
     my $engine = $self->engine;
 
     unless ( $self->offset ) {
-        my $data_section = $self->size - $self->base_size - 1 * $engine->byte_size - 1;
+        my $data_section = $self->size - $self->base_size - $engine->byte_size - 1;
 
         $self->{offset} = $engine->_request_data_sector( $self->size );