From: Greg Sabino Mullane <greg@endpoint.com>
Date: Mon, 4 May 2009 16:19:19 +0000 (-0400)
Subject: Ignore PGUSER env on startup.
X-Git-Tag: 2.9.0~19
X-Git-Url: http://waps.l3s.uni-hannover.de/gitweb/?a=commitdiff_plain;h=ebac63fb1e6ee376818c0e2c81ef010cc4bba018;p=check_postgres.git

Ignore PGUSER env on startup.
---

diff --git a/t/CP_Testing.pm b/t/CP_Testing.pm
index c997c43c7..99bd47267 100644
--- a/t/CP_Testing.pm
+++ b/t/CP_Testing.pm
@@ -252,6 +252,8 @@ sub test_database_handle {
 	};
 	if ($@) {
 		if ($@ =~ /role .+ does not exist/) {
+			## We want the current user, not whatever this is set to:
+			delete $ENV{PGUSER};
 			my @tempdsn = ($dsn, '', '', {AutoCommit=>1,RaiseError=>1,PrintError=>0});
 			my $tempdbh = DBI->connect(@tempdsn);
 			$tempdbh->do("CREATE USER $dbuser SUPERUSER");