Don't run the mech test unless you have new mech. FIXME - Why the hell is the test...

diff --git a/Changes b/Changes
index 938578a..b15109c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,8 +1,12 @@
 Revision history for Perl extension Catalyst::Plugin::Authentication
 
+0.10011 *UNRELEASED*
+      - Update t/live_app_session.t to skip unless you have a newer, more
+        reliable version of TWMC (RT#43817)
+
 0.10010
       - Change from NEXT to MRO::Compat
-      - Chop a number off the versions to get back to the correct 0.10000 
+      - Chop a number off the versions to get back to the correct 0.10000
         version scheme.
 
 0.100092_01

diff --git a/t/live_app_session.t b/t/live_app_session.t
index 8bf83d5..c03866f 100644 (file)
--- a/t/live_app_session.t
+++ b/t/live_app_session.t
@@ -6,7 +6,9 @@ use Test::More;
 BEGIN {
        eval { require Test::WWW::Mechanize::Catalyst; require Catalyst::Plugin::Session; require Catalyst::Plugin::Session::State::Cookie };
        plan skip_all => "This test needs Test::WWW::Mechanize::Catalyst, Catalyst::Plugin::Session and Catalyst::Plugin::Session::State::Cookie installed" if $@;
-       plan tests => 29;
+    plan skip_all => "This test needs Test::WWW::Mechanize::Catalyst >= 0.50, you have only $Test::WWW::Mechanize::Catalyst::VERSION"
+        unless $Test::WWW::Mechanize::Catalyst::VERSION >= 0.50;
+    plan tests => 26;
 }
 
 use lib 't/lib';
@@ -24,3 +26,4 @@ $m->get_ok("http://localhost/goat", "get ok");
 $m->get_ok("http://localhost/fluffy_bunny", "get ok");
 $m->get_ok("http://localhost/possum", "get ok");
 $m->get_ok("http://localhost/butterfly", "get ok");
+