--- trunk2/lib/WebPAC.pm 2004/09/15 16:53:51 448 +++ trunk2/lib/WebPAC.pm 2004/09/15 22:36:23 454 @@ -352,13 +352,13 @@ $self->{'last_pcnt'} ||= 1; - my $p = int($curr * 100 / $max); + my $p = int($curr * 100 / $max) || 1; # reset on re-run if ($p < $self->{'last_pcnt'}) { $self->{'last_pcnt'} = $p; $self->{'last_t'} = time(); - $self->{'last_curr'} = 1; + $self->{'last_curr'} = undef; } if ($p != $self->{'last_pcnt'}) {