Skip to content
Snippets Groups Projects
Commit 3c798313 authored by Andreas Romeyke's avatar Andreas Romeyke
Browse files

- minor fix progress output

parent 13ecb4a0
No related branches found
No related tags found
No related merge requests found
...@@ -77,7 +77,7 @@ sub searching_ie_files ($$) { ...@@ -77,7 +77,7 @@ sub searching_ie_files ($$) {
$relpath =~ s{^\Q$dir\E/?}{}; $relpath =~ s{^\Q$dir\E/?}{};
my $depth = File::Spec->splitdir($relpath); my $depth = File::Spec->splitdir($relpath);
if ($depth <= 2) { if ($depth <= 2) {
print $progressbar->report("find IE files: %40b running: %L ETA: %E (count=$dircount)\r", ++$dircount); print $progressbar->report("find IE files: %40b running: %L ETA: %E (count=$dircount) \r", ++$dircount);
} }
} }
return; return;
...@@ -352,7 +352,7 @@ if (defined $search_dir && -d "$search_dir") { ...@@ -352,7 +352,7 @@ if (defined $search_dir && -d "$search_dir") {
while ( <$fh_unsorted_file>) { # scan each IE while ( <$fh_unsorted_file>) { # scan each IE
$stat->{IEs}++; $stat->{IEs}++;
chomp; chomp;
print $progressbar->report("parse IE files: %40b running: %L ETA: %E (count=$count) \r", ++$count); print $progressbar->report("parse IE files: %40b running: %L ETA: %E (count=$count) \r", ++$count);
my $ret = parse_iexml( $_, $recovery); my $ret = parse_iexml( $_, $recovery);
foreach my $fileobj (@{ $ret->{files} }) { foreach my $fileobj (@{ $ret->{files} }) {
$fileobj->{file_mounted} = map_file($map_path, $fileobj->{filepath}); $fileobj->{file_mounted} = map_file($map_path, $fileobj->{filepath});
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment