diff options
| author | Peter Eisentraut | 2021-09-23 20:49:20 +0000 |
|---|---|---|
| committer | Peter Eisentraut | 2021-09-23 21:07:09 +0000 |
| commit | 73aa5e0cafd0d577fe464ed1d9ac317103f27ea4 (patch) | |
| tree | c60a2cd7cfcd60681d5d66ce79da53622625d4a5 /src/test/authentication | |
| parent | 88b0ae15bc099df6192a3b69b853f86fb015339a (diff) | |
Add missing $Test::Builder::Level settings
One of these was accidentally removed by c50624c. The others are
added by analogy.
Discussion: https://www.postgresql.org/message-id/ae1143fb-455c-c80f-ed66-78d45bd93303@enterprisedb.com
Diffstat (limited to 'src/test/authentication')
| -rw-r--r-- | src/test/authentication/t/001_password.pl | 2 | ||||
| -rw-r--r-- | src/test/authentication/t/002_saslprep.pl | 2 |
2 files changed, 4 insertions, 0 deletions
diff --git a/src/test/authentication/t/001_password.pl b/src/test/authentication/t/001_password.pl index 9498c18d7d1..16570a4e2cb 100644 --- a/src/test/authentication/t/001_password.pl +++ b/src/test/authentication/t/001_password.pl @@ -42,6 +42,8 @@ sub reset_pg_hba # named parameters are passed to connect_ok/fails as-is. sub test_role { + local $Test::Builder::Level = $Test::Builder::Level + 1; + my ($node, $role, $method, $expected_res, %params) = @_; my $status_string = 'failed'; $status_string = 'success' if ($expected_res eq 0); diff --git a/src/test/authentication/t/002_saslprep.pl b/src/test/authentication/t/002_saslprep.pl index 4799e927dbb..acd379df316 100644 --- a/src/test/authentication/t/002_saslprep.pl +++ b/src/test/authentication/t/002_saslprep.pl @@ -36,6 +36,8 @@ sub reset_pg_hba # Test access for a single role, useful to wrap all tests into one. sub test_login { + local $Test::Builder::Level = $Test::Builder::Level + 1; + my $node = shift; my $role = shift; my $password = shift; |