From: Bruce Momjian <bruce@momjian.us>
Date: Thu, 5 Dec 2002 21:03:51 +0000 (+0000)
Subject: It looks like the problem was introduced when the "SET autocommit" and
X-Git-Tag: REL7_4_BETA1~1430
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=fae2f14cddcaad0419de794c894c369e83fedbef;p=postgresql

It looks like the problem was introduced when the "SET autocommit" and
"SET search_path"  commands were added to the beginning of the script.

The attatched patch should fix the problem. It probably should be
applied  against the 7.3 and 7.4 branches.

Steven Singer
---

diff --git a/contrib/dbmirror/DBMirror.pl b/contrib/dbmirror/DBMirror.pl
index e86cbb8a56..a442502ba4 100755
--- a/contrib/dbmirror/DBMirror.pl
+++ b/contrib/dbmirror/DBMirror.pl
@@ -33,7 +33,7 @@
 # 
 #
 ##############################################################################
-# $Id: DBMirror.pl,v 1.4 2002/11/06 17:50:53 momjian Exp $ 
+# $Id: DBMirror.pl,v 1.5 2002/12/05 21:03:51 momjian Exp $ 
 #
 ##############################################################################
 
@@ -128,7 +128,7 @@ sub Main() {
     
   my $setQuery;
   $setQuery = "SET search_path = public";
-  $setResult = $masterConn->exec($setQuery);
+  my $setResult = $masterConn->exec($setQuery);
   if($setResult->resultStatus!=PGRES_COMMAND_OK) { 
     logErrorMessage($masterConn->errorMessage . "\n" . 
 		    $setQuery);
@@ -137,7 +137,7 @@ sub Main() {
     
   my $setQuery2;
   $setQuery2 = "SET autocommit TO 'on'";
-  $setResult2 = $masterConn->exec($setQuery2);
+  my $setResult2 = $masterConn->exec($setQuery2);
   if($setResult2->resultStatus!=PGRES_COMMAND_OK) { 
     logErrorMessage($masterConn->errorMessage . "\n" . 
 		    $setQuery2);