cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestServer.pm

[stas]

stas        02/04/09 02:51:07

  Modified:    perl-framework/Apache-Test/lib/Apache TestServer.pm
  Log:
  in case of t/TEST committing suicide via kill, first scan for core files
  left by the failed to start server.
  
  Revision  Changes    Path
  1.58      +1 -0      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestServer.pm
  
  Index: TestServer.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestServer.pm,v
  retrieving revision 1.57
  retrieving revision 1.58
  diff -u -r1.57 -r1.58
  --- TestServer.pm     7 Apr 2002 04:36:52 -0000       1.57
  +++ TestServer.pm     9 Apr 2002 09:51:07 -0000       1.58
  @@ -433,6 +433,7 @@
                       if ($status) {
                           my $msg = "server has died with status $status";
                           $self->failed_msg("\n$msg");
  +                        Apache::TestRun->new(test_config => 
$config)->scan_core;
                           kill SIGTERM => $$;
                       }
                   }