Update of /home/cvsd/slony1/slony1-engine/tools
In directory main.slony.info:/tmp/cvs-serv8791/tools

Modified Files:
	psql_replication_check.pl 
Log Message:

Make psql_replication_check.pl work with DBD::Pg + fix documentation for the file name.

Devrim Gunduz & Gerfried Fuchs



Index: psql_replication_check.pl
===================================================================
RCS file: /home/cvsd/slony1/slony1-engine/tools/psql_replication_check.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** psql_replication_check.pl	11 Jul 2005 22:00:30 -0000	1.3
--- psql_replication_check.pl	9 May 2007 19:20:03 -0000	1.4
***************
*** 10,14 ****
  use strict;
  
! use Pg;
  use Getopt::Std;
  
--- 10,14 ----
  use strict;
  
! use DBD::Pg;
  use Getopt::Std;
  
***************
*** 44,48 ****
  $status = $conn->status;
  
! if ($status ne PGRES_CONNECTION_OK)
  {
  	chomp(my $error = $conn->errorMessage);
--- 44,48 ----
  $status = $conn->status;
  
! if ($status ne 'PGRES_CONNECTION_OK')
  {
  	chomp(my $error = $conn->errorMessage);
***************
*** 54,58 ****
  $res = $conn->exec($query);
  $status = $res->resultStatus;
! if ($status ne PGRES_TUPLES_OK)
  {
  	chomp(my $error = $conn->errorMessage);
--- 54,58 ----
  $res = $conn->exec($query);
  $status = $res->resultStatus;
! if ($status ne 'PGRES_TUPLES_OK')
  {
  	chomp(my $error = $conn->errorMessage);