From ebac63fb1e6ee376818c0e2c81ef010cc4bba018 Mon Sep 17 00:00:00 2001
From: Greg Sabino Mullane <greg@endpoint.com>
Date: Mon, 4 May 2009 12:19:19 -0400
Subject: [PATCH] Ignore PGUSER env on startup.

---
 t/CP_Testing.pm | 2 ++
 1 file changed, 2 insertions(+)

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");
-- 
2.39.5