In pg_rewind test suite, triple promote timeout to 90s.

nmisch · nmisch · commit 64d89a93c0a8 · 2016-02-10T20:34:57.000-05:00
Thirty seconds was not consistently enough for promotion to complete on
buildfarm members sungazer and tern.  Experiments suggest 43s would have
been enough.  Back-patch to 9.5, where pg_rewind was introduced.
diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm
@@ -404,7 +404,7 @@ sub poll_query_until
 {
 	my ($self, $dbname, $query) = @_;
 
-	my $max_attempts = 30;
+	my $max_attempts = 90;
 	my $attempts     = 0;
 	my ($stdout, $stderr);
 
@@ -426,7 +426,7 @@ sub poll_query_until
 		$attempts++;
 	}
 
-	# The query result didn't change in 30 seconds. Give up. Print the stderr
+	# The query result didn't change in 90 seconds. Give up. Print the stderr
 	# from the last attempt, hopefully that's useful for debugging.
 	diag $stderr;
 	return 0;

Original file line number	Diff line number	Diff line change
`@@ -404,7 +404,7 @@ sub poll_query_until`
`404`	`404`	`{`
`405`	`405`	`my ($self, $dbname, $query) = @_;`
`406`	`406`
`407`		`- my $max_attempts = 30;`
	`407`	`+ my $max_attempts = 90;`
`408`	`408`	`my $attempts = 0;`
`409`	`409`	`my ($stdout, $stderr);`
`410`	`410`
`@@ -426,7 +426,7 @@ sub poll_query_until`
`426`	`426`	`$attempts++;`
`427`	`427`	`}`
`428`	`428`
`429`		`- # The query result didn't change in 30 seconds. Give up. Print the stderr`
	`429`	`+ # The query result didn't change in 90 seconds. Give up. Print the stderr`
`430`	`430`	`# from the last attempt, hopefully that's useful for debugging.`
`431`	`431`	`diag $stderr;`
`432`	`432`	`return 0;`