/[webpac]/trunk2/lib/WebPAC.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk2/lib/WebPAC.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 411 by dpavlin, Sun Sep 5 22:22:37 2004 UTC revision 412 by dpavlin, Tue Sep 7 18:01:36 2004 UTC
# Line 268  sub progress_bar { Line 268  sub progress_bar {
268                  printf STDERR ("%5d / %5d [%-51s] %-2d %% \r",$curr,$max,"=" x ($p/2).">", $p );                  printf STDERR ("%5d / %5d [%-51s] %-2d %% \r",$curr,$max,"=" x ($p/2).">", $p );
269                  $self->{'last_pcnt'} = $p;                  $self->{'last_pcnt'} = $p;
270          }          }
271            print STDERR "\n" if ($p == 100);
272  }  }
273    
274  =head2 open_import_xml  =head2 open_import_xml

Legend:
Removed from v.411  
changed lines
  Added in v.412

  ViewVC Help
Powered by ViewVC 1.1.26