--- cvsroot/Net-FCP/FCP.pm 2003/09/13 06:39:15 1.18 +++ cvsroot/Net-FCP/FCP.pm 2003/09/14 09:48:01 1.19 @@ -71,7 +71,7 @@ use Carp; -$VERSION = 0.07; +$VERSION = 0.08; no warnings; @@ -775,7 +775,7 @@ $self->{data} .= $chunk; - $self->progress ("data", { chunk => length $chunk, total => length $self->{data}, end => $self->{datalength} }); + $self->progress ("data", { chunk => length $chunk, received => length $self->{data}, total => $self->{datalength} }); if ($self->{datalength} == length $self->{data}) { my $data = delete $self->{data};