moved ar accessor to Apache::MVC - bug 14014

[maypole.git] / t / maypole.t

diff --git a/t/maypole.t b/t/maypole.t
index 4c07d21b2834f0a044de9b6983beabadc0baa72f..63e7e6585c0a6f97c1c33adc9167c8271ab402ee 100755 (executable)
--- a/t/maypole.t
+++ b/t/maypole.t
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 use strict;
 use warnings;
-use Test::More tests => 108;
+use Test::More tests => 107;
 use Test::MockModule;
 
 # module compilation
@@ -23,7 +23,7 @@ ok(Maypole->can('init_done'), 'defines an init_done attribute');
 ok(! Maypole->init_done, '... which is false by default');
 ok(Maypole->can('view_object'), 'defines a view_object attribute');
 is(Maypole->view_object, undef, '... which is undefined');
-ok(Maypole->can('ar'), 'defines an "ar" accessor');
+#ok(Maypole->can('ar'), 'defines an "ar" accessor'); moved to Apache::MVC
 ok(Maypole->can('params'), 'defines a "params" accessor');
 ok(Maypole->can('query'), 'defines a "query" accessor');
 ok(Maypole->can('objects'), 'defines an "objects" accessor');