Improve TAP tests by replacing ok() with better Test::More functions

Transpose the changes made by commit fabb33b35 in 002_pg_dump.pl
into its recently-created clone 006_pg_dump_compress.pl.
pull/245/head
Tom Lane 2 months ago
parent 7d129ba54e
commit a6113dc1da
  1. 6
      src/bin/pg_dump/t/006_pg_dump_compress.pl

@ -612,7 +612,8 @@ foreach my $run (sort keys %pgdump_runs)
if (($tests{$test}->{like}->{$test_key} || $tests{$test}->{all_runs})
&& !defined($tests{$test}->{unlike}->{$test_key}))
{
if (!ok($output_file =~ $tests{$test}->{regexp},
if (!like(
$output_file, $tests{$test}->{regexp},
"$run: should dump $test"))
{
diag("Review $run results in $tempdir");
@ -620,7 +621,8 @@ foreach my $run (sort keys %pgdump_runs)
}
else
{
if (!ok($output_file !~ $tests{$test}->{regexp},
if (!unlike(
$output_file, $tests{$test}->{regexp},
"$run: should not dump $test"))
{
diag("Review $run results in $tempdir");

Loading…
Cancel
Save