- fixed a problem with not restoring file position when duplicate chunk headers were found,

  thus causing unneeded rescanning of already scanned area


git-svn-id: https://siedziba.pl:790/svn/repos/dbxrecover@230 455248ca-bdda-0310-9134-f4ebb693071a

1 files changed, 2 insertions, 0 deletions

diff --git a/dbxrecover b/dbxrecover
index c6915d2..bda8fca 100755
--- a/dbxrecover
+++ b/dbxrecover
@@ -215,8 +215,10 @@ use strict;
     my $self = shift;
     my $datasize = unpack("V", substr($self->{header}, 8, 4));
     my $data;
+    my $pos = $self->{file}->getpos;
     $self->{file}->setpos($self->{filepos});
     $self->{file}->read($data, $datasize);
+    $self->{file}->setpos($pos);
     return $data;
   }