#
#========================================================================
#
-# Version 2.1.0_CVS, released 8 Feb 2004.
+# Version 2.1.1, released 13 Mar 2005.
#
# See http://backuppc.sourceforge.net.
#
# the compressed file. Also seek the file so
# it is positioned at the 0xb3.
#
- seek($self->{fh}, -length($self->{dataIn}), 1);
+ sysseek($self->{fh}, -length($self->{dataIn}), 1);
$self->{eof} = 1;
$self->{dataIn} = "";
##print("Got 0xb3 block: considering eof\n");
my($self) = @_;
my $str;
- while ( defined($self->{readLineBuf}) && !@{$self->{readLineBuf}} ) {
+ $self->{readLineBuf} = [] if ( !defined($self->{readLineBuf}) );
+ while ( !@{$self->{readLineBuf}} ) {
$self->read(\$str, $CompMaxRead);
if ( $str eq "" ) {
$str = $self->{readLineFrag};