X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=t%2Fapache_mvc.t;h=75e1a0abad523b739515ebb483caa358eeb76091;hb=e620c543434f3cfff5e54066d106ecfade45a472;hp=e6a110047b69b79d1b519c3960d406955c9c0544;hpb=57b394571a593607a5b7a0ff4bdf9680461cd6a4;p=maypole.git diff --git a/t/apache_mvc.t b/t/apache_mvc.t index e6a1100..75e1a0a 100644 --- a/t/apache_mvc.t +++ b/t/apache_mvc.t @@ -1,17 +1,22 @@ #!/usr/bin/perl -w use strict; use Test::More; + BEGIN { - if (eval { require Apache::Request }) { + if (eval { require Apache2::RequestRec }) { + $ENV{MOD_PERL_API_VERSION} = 2; + plan tests => 3; + } elsif (eval { require Apache::Request }) { plan tests => 3; } else { - Test::More->import(skip_all =>"Apache::Request is not installed: $@"); + Test::More->import(skip_all =>"Neither Apache2::RequestRec nor Apache::Request is installed: $@"); } } require_ok('Apache::MVC'); ok($Apache::MVC::VERSION, 'defines $VERSION'); ok(Apache::MVC->can('ar'), 'defines an "ar" accessor'); + # defines $VERSION # uses mod_perl # @ISA = 'Maypole'