Silence perlcritic warning about missing return.

Per buildfarm member crake.

diff --git a/src/bin/pg_verify_checksums/t/002_actions.pl b/src/bin/pg_verify_checksums/t/002_actions.pl
index a9003b14cc88857df355b5ee73f591ec551de22b..ff4772708b52b11604f2ec64004415d8d94fb27b 100644 (file)
--- a/src/bin/pg_verify_checksums/t/002_actions.pl
+++ b/src/bin/pg_verify_checksums/t/002_actions.pl
@@ -109,6 +109,8 @@ sub fail_corrupt
                                                  [qr/^$/],
                                                  [qr/could not read block/],
                                                  "fails for corrupted data in $file");
+
+       return;
 }
 
 # Authorized relation files filled with corrupted data cause the