X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=blobdiff_plain;f=t%2Fapache_mvc.t;h=e6a110047b69b79d1b519c3960d406955c9c0544;hp=07bfae931f95da2405b407a4c18ad3c8de911ed2;hb=fdef988c4b6e0c95310edfed99bcb1bb959a6da4;hpb=2390ea35bcbc4b57278a123d4112d78bd1f7e3f7

diff --git a/t/apache_mvc.t b/t/apache_mvc.t
index 07bfae9..e6a1100 100644
--- a/t/apache_mvc.t
+++ b/t/apache_mvc.t
@@ -3,7 +3,7 @@ use strict;
 use Test::More;
 BEGIN {
     if (eval { require Apache::Request }) {
-        plan tests => 2;
+        plan tests => 3;
     } else {
         Test::More->import(skip_all =>"Apache::Request is not installed: $@");
     }
@@ -11,6 +11,7 @@ BEGIN {
 
 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'