cvs commit: modperl-2.0/t/response/TestAPI module.pm

[stas]

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';