Copy/paste fail on end of Perl line (thanks JGH)

diff --git a/test/scripts/2701-redis-cluster/2701 b/test/scripts/2701-redis-cluster/2701
index 85f05b74fa2e3b6567396145ec8d10f8f027e37b..66a50051a58f84513715cd0f39231d11d0aa05a4 100644 (file)
--- a/test/scripts/2701-redis-cluster/2701
+++ b/test/scripts/2701-redis-cluster/2701
@@ -43,7 +43,7 @@ ${lookup redis{get ${quote_redis:01t67it}}}
 #
 sleep 5
 perl
 #
 sleep 5
 perl

-my @pidfiles = ( "DIR/redis-cluster/node1/node1.pid", "DIR/redis-cluster/node2/
+my @pidfiles = ( "DIR/redis-cluster/node1/node1.pid", "DIR/redis-cluster/node2/" );

 foreach my $pidfile (@pidfiles) {
   if ( -f $pidfile ) {
     open (my $fh, "<", $pidfile);
 foreach my $pidfile (@pidfiles) {
   if ( -f $pidfile ) {
     open (my $fh, "<", $pidfile);