--- trunk2/lib/WebPAC.pm	2004/09/15 16:53:51	448
+++ trunk2/lib/WebPAC.pm	2004/09/21 19:08:11	459
@@ -352,15 +352,17 @@
 
 	$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;
 	}
 
+	$self->{'last_t'} ||= time();
+
 	if ($p != $self->{'last_pcnt'}) {
 
 		my $last_curr = $self->{'last_curr'} || $curr;