cvs commit: modperl-2.0/lib/ModPerl TestRun.pm

[gozer]

gozer       2004/09/21 17:18:14

  Modified:    lib/ModPerl TestRun.pm
  Log:
  Propagate the value of httpd from Apache::Build to Apache::TestConfig
  so that t/TEST can find it during static builds
  Reviewed by:  stas
  
  Revision  Changes    Path
  1.22      +8 -0      modperl-2.0/lib/ModPerl/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/ModPerl/TestRun.pm,v
  retrieving revision 1.21
  retrieving revision 1.22
  diff -u -r1.21 -r1.22
  --- TestRun.pm        7 May 2004 18:02:47 -0000       1.21
  +++ TestRun.pm        22 Sep 2004 00:18:13 -0000      1.22
  @@ -54,6 +54,14 @@
   
   use base qw(Apache::TestConfig);
   
  +sub new {
  +    my $class = shift;
  +    my $self = $class->SUPER::new(@_);
  +    my $config = Apache::Build->build_config;
  +    $self->{conf_opts}->{httpd} ||= $config->{httpd};
  +    return $self;
  +}
  +
   # don't inherit LoadModule perl_module from the apache httpd.conf
   sub should_skip_module {
       my($self, $name) = @_;