cvs commit: modperl-2.0/Apache-Test/lib/Apache TestRun.pm

[sbekman]

sbekman     01/06/17 08:26:47

  Modified:    Apache-Test/lib/Apache TestRun.pm
  Log:
  start the server if -run-tests is used before the server was started
  
  Revision  Changes    Path
  1.5       +4 -0      modperl-2.0/Apache-Test/lib/Apache/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Apache-Test/lib/Apache/TestRun.pm,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- TestRun.pm        2001/04/04 17:27:16     1.4
  +++ TestRun.pm        2001/06/17 15:26:46     1.5
  @@ -241,6 +241,10 @@
   
       if ($self->{opts}->{'start-httpd'}) {
           exit 1 unless $self->{server}->start;
  +    } elsif ($self->{opts}->{'run-tests'} and !$self->{server}->ping) {
  +        # make sure that the server is up when -run-tests is used
  +        print "the test server wasn't not running: starting it...\n";
  +        exit 1 unless $self->{server}->start;
       }
   }