perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject svn commit: r124811 - /perl/modperl/trunk/lib/ModPerl/TestRun.pm
Date Mon, 10 Jan 2005 16:27:30 GMT
Author: stas
Date: Mon Jan 10 08:27:30 2005
New Revision: 124811

URL: http://svn.apache.org/viewcvs?view=rev&rev=124811
Log:
it's not mod_fastcgi.c but usually mod_fastcgi-xx.yy.c so use regex in 
autoconfig_skip_module_add

Modified:
   perl/modperl/trunk/lib/ModPerl/TestRun.pm

Modified: perl/modperl/trunk/lib/ModPerl/TestRun.pm
Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/lib/ModPerl/TestRun.pm?view=diff&rev=124811&p1=perl/modperl/trunk/lib/ModPerl/TestRun.pm&r1=124810&p2=perl/modperl/trunk/lib/ModPerl/TestRun.pm&r2=124811
==============================================================================
--- perl/modperl/trunk/lib/ModPerl/TestRun.pm	(original)
+++ perl/modperl/trunk/lib/ModPerl/TestRun.pm	Mon Jan 10 08:27:30 2005
@@ -64,12 +64,9 @@
 
 # - don't inherit LoadModule perl_module from the apache httpd.conf
 # - loaded fastcgi crashes some mp2 tests
-my %skip = map { ("mod_$_.c" => 1) } qw(perl fastcgi);
-sub should_skip_module {
-    my($self, $name) = @_;
+my @skip = ('mod_perl.c', qr/mod_fastcgi.*?\.c$/);
 
-    exists $skip{$name} ? 1 : $self->SUPER::should_skip_module($name);
-}
+Apache::TestConfig::autoconfig_skip_module_add(@skip);
 
 1;
 

Mime
View raw message