--- trunk2/lib/WebPAC.pm	2004/09/15 21:21:36	453
+++ trunk2/lib/WebPAC.pm	2004/09/15 22:36:23	454
@@ -352,7 +352,7 @@
 
 	$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'}) {