--- trunk2/lib/WebPAC.pm 2004/09/05 22:22:37 411 +++ trunk2/lib/WebPAC.pm 2004/09/07 18:01:36 412 @@ -268,6 +268,7 @@ printf STDERR ("%5d / %5d [%-51s] %-2d %% \r",$curr,$max,"=" x ($p/2).">", $p ); $self->{'last_pcnt'} = $p; } + print STDERR "\n" if ($p == 100); } =head2 open_import_xml