From 9cc1b6368f79779b3805e34fdefdfbe35c5428b0 Mon Sep 17 00:00:00 2001 From: Andreas Romeyke <andreas.romeyke@slub-dresden.de> Date: Mon, 2 Sep 2024 11:56:00 +0200 Subject: [PATCH] - fixed fragile tests --- t/03-search.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/t/03-search.t b/t/03-search.t index 0dc88d9..634a869 100644 --- a/t/03-search.t +++ b/t/03-search.t @@ -156,7 +156,7 @@ subtest 'search by files' => sub { #say "STDOUT:",$testapp->stdout; #say "STDERR:",$testapp->stderr; like($testapp->stdout, qr/\A"aipid"\n.*"47daf26a-02a1-4776-a8db-de04c6708bd2"/s, 'ta-tool search by pronom-id, existing, stdout'); - like($testapp->stderr, qr/\Afound 166 results\nreporting results 1 … 10 output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); + like($testapp->stderr, qr/\Afound \d{2,} results\nreporting results 1 … 10 output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); is($? >> 8, 0, 'ta-tool search by pronom-id, existing, exit status'); }; }; @@ -169,14 +169,14 @@ subtest 'check paginations' => sub { #say "STDOUT:",$testapp->stdout; #say "STDERR:",$testapp->stderr; like($testapp->stdout, qr/\A"idx","aipid"\n2,"2ed0c682-4565-4320-8247-6da0cc0642f1"\Z/s, 'ta-tool search by pronom-id, existing, stdout'); - like($testapp->stderr, qr/\Afound 166 results\nreporting results output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); + like($testapp->stderr, qr/\Afound \d{2,} results\nreporting results output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); is($? >> 8, 0, 'ta-tool search by pronom-id, existing, exit status'); $testapp->run(args => 'search --pronom-id fmt/101 --with-result-index --output-as-csv --startrecord 3 --maxrecords 2'); #say "STDOUT:",$testapp->stdout; #say "STDERR:",$testapp->stderr; like($testapp->stdout, qr/\A"idx","aipid"\n3,"5687a403-673d-45c1-864f-f7f22a7aadb9"\n4,"db256475-10bd-40ee-83cc-dab8424346ba"\Z/s, 'ta-tool search by pronom-id, existing, stdout'); - like($testapp->stderr, qr/\Afound 166 results\nreporting results 3 … 4 output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); + like($testapp->stderr, qr/\Afound \d{2,} results\nreporting results 3 … 4 output as csv\Z/s, 'ta-tool search by pronom-id, existing, stderr'); is($? >> 8, 0, 'ta-tool search by pronom-id, existing, exit status'); }; }; -- GitLab