Author: stas Date: Sat Dec 11 08:14:05 2004 New Revision: 111604 URL: http://svn.apache.org/viewcvs?view=rev&rev=111604 Log: don't die on unsupported by Apache::SizeLimit platforms
Modified: perl/modperl/trunk/t/conf/post_config_startup.pl Modified: perl/modperl/trunk/t/conf/post_config_startup.pl Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/conf/post_config_startup.pl?view=diff&rev=111604&p1=perl/modperl/trunk/t/conf/post_config_startup.pl&r1=111603&p2=perl/modperl/trunk/t/conf/post_config_startup.pl&r2=111604 ============================================================================== --- perl/modperl/trunk/t/conf/post_config_startup.pl (original) +++ perl/modperl/trunk/t/conf/post_config_startup.pl Sat Dec 11 08:14:05 2004 @@ -62,10 +62,15 @@ } sub test_apache_size_limit { - require Apache::MPM; # would be nice to write a real test, but for now just see that we - # can load it for non-threaded mpms - require Apache::SizeLimit unless Apache::MPM->is_threaded; + # can load it for non-threaded mpms on supported platforms + require Apache::MPM; + return if Apache::MPM->is_threaded; + eval { require Apache::SizeLimit }; + if ($@) { + # unsupported platform + die $@ unless $@ =~ /Apache::SizeLimit not implemented on/; + } } sub test_apache_status {
