From: Tom Lane <tgl@sss.pgh.pa.us>
Date: Fri, 19 Oct 2018 18:00:17 +0000 (-0400)
Subject: Silence perlcritic warning about missing return.
X-Git-Tag: REL_12_BETA1~1364
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=e65e8f8218e3b99534f01bd5e67b1e6ec99e6f7e;p=postgresql

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 a9003b14cc..ff4772708b 100644
--- 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