Index: DBMirror.pl
===================================================================
RCS file: /projects/cvsroot/pgsql-server/contrib/dbmirror/DBMirror.pl,v
retrieving revision 1.9
diff -u -r1.9 DBMirror.pl
--- DBMirror.pl	22 Apr 2004 03:48:38 -0000	1.9
+++ DBMirror.pl	1 Jul 2004 01:31:27 -0000
@@ -249,6 +249,8 @@
       if($::slaveInfo->{'status'} eq 'FileOpen')
       {
 	  close ($::slaveInfo->{'TransactionFile'});
+	   $::slaveInfo->{"status"} = 'FileClosed';
+
       }
       elsif($::slaveInfo->{'status'} eq 'DBOpen')
       {