httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestServer.pm
Date Fri, 04 Jan 2002 04:48:58 GMT
stas        02/01/03 20:48:58

  Modified:    perl-framework/Apache-Test/lib/Apache TestServer.pm
  Log:
  - use explicit fork for spawning httpd, now works with 1.3 and 2.0
  
  Revision  Changes    Path
  1.48      +10 -1     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.47
  retrieving revision 1.48
  diff -u -r1.47 -r1.48
  --- TestServer.pm	31 Dec 2001 10:58:22 -0000	1.47
  +++ TestServer.pm	4 Jan 2002 04:48:58 -0000	1.48
  @@ -433,7 +433,16 @@
                   }
               }
           };
  -        $child_pid = open $child_in_pipe, "|$cmd";
  +
  +        defined(my $pid = fork) or die "Can't fork: $!";
  +        unless ($pid) { # child
  +            my $status = system "$cmd";
  +            if ($status) {
  +                $status  = $? >> 8;
  +                #error "httpd didn't start! $status";
  +            }
  +            CORE::exit $status;
  +        }
       }
   
       while ($old_pid and $old_pid == $self->pid) {
  
  
  

Mime
View raw message