aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorTom Lane <tgl@sss.pgh.pa.us>2021-03-02 23:32:43 -0500
committerTom Lane <tgl@sss.pgh.pa.us>2021-03-02 23:32:43 -0500
commitd422a2a94b1e7a7bb25da9d5511fffff750c3f21 (patch)
treeee93d39e08629fa62a70b623a399bfa59b025f6e /src
parent8eda3eba3063d619214b59f7bc7ecfc09c21b93a (diff)
downloadpostgresql-d422a2a94b1e7a7bb25da9d5511fffff750c3f21.tar.gz
postgresql-d422a2a94b1e7a7bb25da9d5511fffff750c3f21.zip
Silence perlcritic warning in commit ee28cacf6.
Per buildfarm; this fix is from Michael Paquier (vignesh C proposed nearly the same). Discussion: https://postgr.es/m/YD8IZ9OKfUf9X1eF@paquier.xyz
Diffstat (limited to 'src')
-rw-r--r--src/test/recovery/t/001_stream_rep.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/test/recovery/t/001_stream_rep.pl b/src/test/recovery/t/001_stream_rep.pl
index 07a9912ce26..01a1daf0049 100644
--- a/src/test/recovery/t/001_stream_rep.pl
+++ b/src/test/recovery/t/001_stream_rep.pl
@@ -85,7 +85,8 @@ sub test_target_session_attrs
my $node2_port = $node2->port;
my $node2_name = $node2->name;
- my $target_name = $target_node->name if (defined $target_node);
+ my $target_name = undef;
+ $target_name = $target_node->name if (defined $target_node);
# Build connection string for connection attempt.
my $connstr = "host=$node1_host,$node2_host ";