That's correct, and really, it's a borked test then. It did pass for me once strangely, as I managed to have 2 mod_perls in my httpd, a static one and a dso loaded one ( can't reproduce that, lol)
Index: t/response/TestAPI/module.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/module.pm,v retrieving revision 1.9 diff -u -I$Id -r1.9 module.pm --- t/response/TestAPI/module.pm 8 Apr 2004 01:56:31 -0000 1.9 +++ t/response/TestAPI/module.pm 6 May 2004 20:24:04 -0000 @@ -7,6 +7,7 @@ use Apache::Test; use Apache::TestConfig; use Apache::TestUtil; +use Apache::BuildConfig;
use Apache::Module (); use DynaLoader (); @@ -84,9 +85,12 @@ "Apache::Module::loaded('Apache__Module_foo.c')");
#.so - ok t_cmp(1, Apache::Module::loaded('mod_perl.so'), + { + my $expect = Apache::BuildConfig->new->{MP_USE_STATIC} ? 0 : 1; + ok t_cmp($expect, Apache::Module::loaded('mod_perl.so'), "Apache::Module::loaded('mod_perl.so')"); - + } + ok t_cmp(0, Apache::Module::loaded('Apache__Module__foo.so'), "Apache::Module::loaded('Apache__Module_foo.so')");
Actually it doesn't work if you have both USE_(STATIC|DSO) set. I will try with SHARED_LIB
__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
