diff options
| author | Andrew Dunstan | 2018-05-27 13:08:42 +0000 |
|---|---|---|
| committer | Andrew Dunstan | 2018-05-27 13:08:42 +0000 |
| commit | 3a7cc727c7c502353dbb730a0db793abec4de44b (patch) | |
| tree | c140b2974559d0a13d98c132ae52f7d0992aff95 /src/test/ldap | |
| parent | 8a56ff484808e9c05df9656cf4244229e8c7960d (diff) | |
Don't fall off the end of perl functions
This complies with the perlcritic policy
Subroutines::RequireFinalReturn, which is a severity 4 policy. Since we
only currently check at severity level 5, the policy is raised to that
level until we move to level 4 or lower, so that any new infringements
will be caught.
A small cosmetic piece of tidying of the pgperlcritic script is
included.
Mike Blackwell
Discussion: https://postgr.es/m/CAESHdJpfFm_9wQnQ3koY3c91FoRQsO-fh02za9R3OEMndOn84A@mail.gmail.com
Diffstat (limited to 'src/test/ldap')
| -rw-r--r-- | src/test/ldap/t/001_auth.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/test/ldap/t/001_auth.pl b/src/test/ldap/t/001_auth.pl index 9ade9a2b000..67b406c981b 100644 --- a/src/test/ldap/t/001_auth.pl +++ b/src/test/ldap/t/001_auth.pl @@ -144,6 +144,7 @@ sub test_access my $res = $node->psql('postgres', 'SELECT 1', extra_params => [ '-U', $role ]); is($res, $expected_res, $test_name); + return; } note "simple bind"; |