diff options
| author | Bruce Momjian <bruce@momjian.us> | 2002-10-18 18:41:22 +0000 |
|---|---|---|
| committer | Bruce Momjian <bruce@momjian.us> | 2002-10-18 18:41:22 +0000 |
| commit | aa4c702eac936964649f905741b4a99f4b489200 (patch) | |
| tree | 517d3c28aa3d28eb95b19c8676c940b5cefe2031 /contrib/dbmirror/clean_pending.pl | |
| parent | fb9bc342fffc157d6ca4b635aeeaccb3c1370b91 (diff) | |
| download | postgresql-aa4c702eac936964649f905741b4a99f4b489200.tar.gz | |
Update /contrib for "autocommit TO 'on'".
Create objects in public schema.
Make spacing/capitalization consistent.
Remove transaction block use for object creation.
Remove unneeded function GRANTs.
Diffstat (limited to 'contrib/dbmirror/clean_pending.pl')
| -rwxr-xr-x | contrib/dbmirror/clean_pending.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/contrib/dbmirror/clean_pending.pl b/contrib/dbmirror/clean_pending.pl index 2729288177..a74ea24700 100755 --- a/contrib/dbmirror/clean_pending.pl +++ b/contrib/dbmirror/clean_pending.pl @@ -16,7 +16,7 @@ # GNU General Public License for more details. # ############################################################################## -# $Id: clean_pending.pl,v 1.1 2002/06/23 21:58:08 momjian Exp $ +# $Id: clean_pending.pl,v 1.2 2002/10/18 18:41:19 momjian Exp $ ############################################################################## @@ -69,6 +69,10 @@ unless($dbConn->status == PGRES_CONNECTION_OK) { printf("Can't connect to database\n"); die; } +my $setresult = $dbConn->exec("SET autocommit TO 'on'"); +unless($setresult->resultStatus == PGRES_COMMAND_OK) { + die $dbConn->errorMessage; +} my $result = $dbConn->exec("BEGIN"); unless($result->resultStatus == PGRES_COMMAND_OK) { die $dbConn->errorMessage; |
