diff options
author | Jay Berkenbilt <ejb@ql.org> | 2021-12-30 18:56:27 +0100 |
---|---|---|
committer | Jay Berkenbilt <ejb@ql.org> | 2022-01-06 00:13:25 +0100 |
commit | 4782b5904f2cddc7ecda86abc0590a2ff8715b33 (patch) | |
tree | 845e42d34511ed8340c6af87188057cbfa0c7035 /qpdf/qtest/qpdf.test | |
parent | 32f7d9989a3c6d45083ff9e686d5eebb87615e42 (diff) | |
download | qpdf-4782b5904f2cddc7ecda86abc0590a2ff8715b33.tar.zst |
Move filter-completion.pl to libtests/arg_parser
Diffstat (limited to 'qpdf/qtest/qpdf.test')
-rw-r--r-- | qpdf/qtest/qpdf.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/qpdf/qtest/qpdf.test b/qpdf/qtest/qpdf.test index cd401216..d12c9492 100644 --- a/qpdf/qtest/qpdf.test +++ b/qpdf/qtest/qpdf.test @@ -115,6 +115,8 @@ my @completion_tests = ( ['qpdf --encrypt user\ password ', undef, 'quoting'], ); $n_tests += 2 * scalar(@completion_tests); +my $completion_filter = + "perl ../../../libtests/qtest/arg_parser/filter-completion.pl"; foreach my $c (@completion_tests) { my ($cmd, $point, $description) = @$c; @@ -126,12 +128,12 @@ foreach my $c (@completion_tests) } $td->runtest("bash completion: $description", {$td->COMMAND => [@{bash_completion($cmd, $point)}], - $td->FILTER => "perl filter-completion.pl $out"}, + $td->FILTER => "$completion_filter $out"}, {$td->FILE => "$out", $td->EXIT_STATUS => 0}, $td->NORMALIZE_NEWLINES); $td->runtest("zsh completion: $description", {$td->COMMAND => [@{zsh_completion($cmd, $point)}], - $td->FILTER => "perl filter-completion.pl $zout"}, + $td->FILTER => "$completion_filter $zout"}, {$td->FILE => "$zout", $td->EXIT_STATUS => 0}, $td->NORMALIZE_NEWLINES); } |