diff --git a/src/test/perl/PostgreSQL/Test/Cluster.pm b/src/test/perl/PostgreSQL/Test/Cluster.pm
index c793f2135d..3f133cafbd 100644
--- a/src/test/perl/PostgreSQL/Test/Cluster.pm
+++ b/src/test/perl/PostgreSQL/Test/Cluster.pm
@@ -363,7 +363,7 @@ sub raw_connect_works
 			return 0;
 		}
 	}
-	return 1
+	return 1;
 }
 
 =pod