stas 2004/08/25 14:40:38
Modified: t/response/TestAPI module.pm
Log:
consistency cleanup
Revision Changes Path
1.20 +20 -20 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.19
retrieving revision 1.20
diff -u -u -r1.19 -r1.20
--- module.pm 25 Aug 2004 21:39:40 -0000 1.19
+++ module.pm 25 Aug 2004 21:40:38 -0000 1.20
@@ -33,48 +33,48 @@
ok defined $core && $core->name eq 'core.c';
#.c
- ok t_cmp(Apache::Module::loaded('mod_perl.c'), 1,
- "Apache::Module::loaded('mod_perl.c')");
+ ok t_cmp Apache::Module::loaded('mod_perl.c'), 1,
+ "Apache::Module::loaded('mod_perl.c')";
- ok t_cmp(Apache::Module::loaded('Apache__Module_foo.c'), 0,
- "Apache::Module::loaded('Apache__Module_foo.c')");
+ ok t_cmp Apache::Module::loaded('Apache__Module_foo.c'), 0,
+ "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')");
+ ok t_cmp Apache::Module::loaded('mod_perl.so'), $expect,
+ "Apache::Module::loaded('mod_perl.so')";
}
- ok t_cmp(Apache::Module::loaded('Apache__Module__foo.so'), 0,
- "Apache::Module::loaded('Apache__Module_foo.so')");
+ ok t_cmp Apache::Module::loaded('Apache__Module__foo.so'), 0,
+ "Apache::Module::loaded('Apache__Module_foo.so')";
#perl
{
- ok t_cmp(Apache::Module::loaded('Apache::Module'), 1,
- "Apache::Module::loaded('Apache::Module')");
+ ok t_cmp Apache::Module::loaded('Apache::Module'), 1,
+ "Apache::Module::loaded('Apache::Module')";
- ok t_cmp(Apache::Module::loaded('Apache__Module_foo'), 0,
- "Apache::Module::loaded('Apache__Module_foo')");
+ ok t_cmp Apache::Module::loaded('Apache__Module_foo'), 0,
+ "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')");
+ ok t_cmp Apache::Module::loaded('TestAPI::module::foo'), 0,
+ "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')");
+ ok t_cmp Apache::Module::loaded('TestAPI'), 0,
+ "Apache::Module::loaded('TestAPI')";
}
#bogus
- ok t_cmp(Apache::Module::loaded('Apache__Module_foo.foo'), 0,
- "Apache::Module::loaded('Apache__Module_foo.foo')");
+ ok t_cmp Apache::Module::loaded('Apache__Module_foo.foo'), 0,
+ "Apache::Module::loaded('Apache__Module_foo.foo')";
- ok t_cmp(Apache::Module::loaded(''), 0,
- "Apache::Module::loaded('')");
+ ok t_cmp Apache::Module::loaded(''), 0,
+ "Apache::Module::loaded('')";
ok t_cmp ref($top_module), 'Apache::Module', 'top_module';
