Appease perlcritic

Food for the gods must always be found somehow, even when the land starves.

diff --git a/src/test/recovery/t/019_replslot_limit.pl b/src/test/recovery/t/019_replslot_limit.pl
index d6bc77e2b5a0ba0c079f29c132991982616ea0b9..8a0542e8afa82b80ed80743d0c61f337fab65daa 100644 (file)
--- a/src/test/recovery/t/019_replslot_limit.pl
+++ b/src/test/recovery/t/019_replslot_limit.pl
@@ -192,6 +192,7 @@ sub advance_wal
    {
        $node->safe_psql('postgres', "CREATE TABLE t (); DROP TABLE t; SELECT pg_switch_wal();");
    }
+   return;
 }
 
 # return the size of logfile of $node in bytes