stas 2004/08/25 14:47:19
Modified: t/response/TestAPI module.pm Log: cleanup of the cleanup Revision Changes Path 1.21 +10 -10 modperl-2.0/t/response/TestAPI/module.pm Index: module.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/module.pm,v retrieving revision 1.20 retrieving revision 1.21 diff -u -u -r1.20 -r1.21 --- module.pm 25 Aug 2004 21:40:38 -0000 1.20 +++ module.pm 25 Aug 2004 21:47:19 -0000 1.21 @@ -34,47 +34,47 @@ #.c ok t_cmp Apache::Module::loaded('mod_perl.c'), 1, - "Apache::Module::loaded('mod_perl.c')"; + "Apache::Module::loaded('mod_perl.c')"; ok t_cmp Apache::Module::loaded('Apache__Module_foo.c'), 0, - "Apache::Module::loaded('Apache__Module_foo.c')"; + "Apache::Module::loaded('Apache__Module_foo.c')"; #.so { my $build = Apache::BuildConfig->new; my $expect = $build->should_build_apache ? 0 : 1; ok t_cmp Apache::Module::loaded('mod_perl.so'), $expect, - "Apache::Module::loaded('mod_perl.so')"; + "Apache::Module::loaded('mod_perl.so')"; } ok t_cmp Apache::Module::loaded('Apache__Module__foo.so'), 0, - "Apache::Module::loaded('Apache__Module_foo.so')"; + "Apache::Module::loaded('Apache__Module_foo.so')"; #perl { ok t_cmp Apache::Module::loaded('Apache::Module'), 1, - "Apache::Module::loaded('Apache::Module')"; + "Apache::Module::loaded('Apache::Module')"; ok t_cmp Apache::Module::loaded('Apache__Module_foo'), 0, - "Apache::Module::loaded('Apache__Module_foo')"; + "Apache::Module::loaded('Apache__Module_foo')"; # TestAPI::module::foo wasn't loaded but the stash exists $TestAPI::module::foo::test = 1; ok t_cmp Apache::Module::loaded('TestAPI::module::foo'), 0, - "Apache::Module::loaded('TestAPI::module::foo')"; + "Apache::Module::loaded('TestAPI::module::foo')"; # module TestAPI wasn't loaded but the stash exists, since # TestAPI::module was loaded ok t_cmp Apache::Module::loaded('TestAPI'), 0, - "Apache::Module::loaded('TestAPI')"; + "Apache::Module::loaded('TestAPI')"; } #bogus ok t_cmp Apache::Module::loaded('Apache__Module_foo.foo'), 0, - "Apache::Module::loaded('Apache__Module_foo.foo')"; + "Apache::Module::loaded('Apache__Module_foo.foo')"; ok t_cmp Apache::Module::loaded(''), 0, - "Apache::Module::loaded('')"; + "Apache::Module::loaded('')"; ok t_cmp ref($top_module), 'Apache::Module', 'top_module';