diff options
Diffstat (limited to 'qpdf')
| -rw-r--r-- | qpdf/qtest/progress-reporting.test | 14 | ||||
| -rw-r--r-- | qpdf/qtest/qpdf/small-stdout-progress.out | 3 |
2 files changed, 15 insertions, 2 deletions
diff --git a/qpdf/qtest/progress-reporting.test b/qpdf/qtest/progress-reporting.test index 3c7fb2cf..fe39a0df 100644 --- a/qpdf/qtest/progress-reporting.test +++ b/qpdf/qtest/progress-reporting.test @@ -14,13 +14,23 @@ cleanup(); my $td = new TestDriver('progress-reporting'); -my $n_tests = 1; +my $n_tests = 3; $td->runtest("progress report on small file", - {$td->COMMAND => "qpdf --progress minimal.pdf a.pdf", + {$td->COMMAND => + "qpdf --progress --deterministic-id minimal.pdf a.pdf", $td->FILTER => "perl filter-progress.pl"}, {$td->FILE => "small-progress.out", $td->EXIT_STATUS => 0}, $td->NORMALIZE_NEWLINES); +$td->runtest("progress report to stdout", + {$td->COMMAND => + "qpdf --progress --deterministic-id minimal.pdf - > b.pdf", + $td->FILTER => "perl filter-progress.pl"}, + {$td->FILE => "small-stdout-progress.out", $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); +$td->runtest("compare", + {$td->FILE => "a.pdf"}, + {$td->FILE => "b.pdf"}); cleanup(); $td->report($n_tests); diff --git a/qpdf/qtest/qpdf/small-stdout-progress.out b/qpdf/qtest/qpdf/small-stdout-progress.out new file mode 100644 index 00000000..c1ec4e64 --- /dev/null +++ b/qpdf/qtest/qpdf/small-stdout-progress.out @@ -0,0 +1,3 @@ +qpdf: standard output: write progress: 0% +....other write progress.... +qpdf: standard output: write progress: 100% |