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

[stas]

stas        2004/08/11 11:42:56

  Modified:    perl-framework/Apache-Test/lib/Apache TestConfig.pm
  Log:
  skip ssl cleanup if there is httpd config
  
  Revision  Changes    Path
  1.237     +4 -0      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
  
  Index: TestConfig.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
  retrieving revision 1.236
  retrieving revision 1.237
  diff -u -u -r1.236 -r1.237
  --- TestConfig.pm     11 Aug 2004 08:42:36 -0000      1.236
  +++ TestConfig.pm     11 Aug 2004 18:42:56 -0000      1.237
  @@ -1369,6 +1369,10 @@
   sub sslca_clean {
       my $self = shift;
   
  +    # XXX: httpd config is required, for now just skip ssl clean if
  +    # there is none
  +    return unless $self->{vars}->{httpd};
  +
       return unless $self->sslca_can;
   
       Apache::TestSSLCA::clean($self);