tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-11-22 22:17:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

bug #34369: GNU Parallel Bug Reports Incorrect number of jobs-completed with --progress.

Browse source
This commit is contained in:
Ole Tange 2012-10-01 22:33:17 +02:00
parent 5c557c0973
commit b170f88593
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/parallel
View file

@ -1334,9 +1334,9 @@ sub drain_job_queue {
} while ($Global::total_running > 0 } while ($Global::total_running > 0
or or
not $Global::start_no_new_jobs and not $Global::JobQueue->empty()); not $Global::start_no_new_jobs and not $Global::JobQueue->empty());
if($::opt_progress) { if($::opt_progress) {
print $Global::original_stderr "\n"; my %progress = progress();
print $Global::original_stderr "\r", $progress{'status'}, "\n";
} }
} }