[SVN] [122] Move unlink, just in case we die() connecting to console

[matt]

Revision: 122
Author:   matt
Date:     2006-08-24 15:28:17 +0000 (Thu, 24 Aug 2006)

Log Message:
-----------
Move unlink, just in case we die() connecting to console

Modified Paths:
--------------
    trunk/lib/AxKit2/Test.pm

Modified: trunk/lib/AxKit2/Test.pm
===================================================================
--- trunk/lib/AxKit2/Test.pm    2006-08-24 15:11:27 UTC (rev 121)
+++ trunk/lib/AxKit2/Test.pm    2006-08-24 15:28:17 UTC (rev 122)
@@ -125,6 +125,8 @@
     
     return unless $self->{child_pid};
     
+    unlink($self->{config_file});
+    
     my $conf = IO::Socket::INET->new(
         PeerAddr => "127.0.0.1",
         PeerPort => $self->{console_port},
@@ -143,7 +145,6 @@
         $kid = waitpid(-1, WNOHANG);
     } until $kid > 0;
     
-    unlink($self->{config_file});
 }
 
 1;