X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_app.t;h=9ef202e8c72287d59b94cdedce02c49dd6979b0c;hb=refs%2Ftags%2Fv0.08;hp=126c0661b1c734134f4a371e3167f187891e884c;hpb=dbec0a9dc5b4fa7d8f4a741b0fb95dce26790b3c;p=catagits%2FCatalyst-Plugin-Session-State-Cookie.git diff --git a/t/live_app.t b/t/live_app.t index 126c066..9ef202e 100644 --- a/t/live_app.t +++ b/t/live_app.t @@ -10,6 +10,7 @@ BEGIN { plan skip_all => "This test requires Test::WWW::Mechanize::Catalyst in order to run" if $@; + plan skip_all => 'Test::WWW::Mechanize::Catalyst >= 0.40 required' if $Test::WWW::Mechanize::Catalyst::VERSION < 0.40; plan 'no_plan'; } @@ -49,27 +50,27 @@ use Test::WWW::Mechanize::Catalyst qw/CookieTestApp/; my $m = Test::WWW::Mechanize::Catalyst->new; -$m->get_ok( "http://foo.com/stream", "get page" ); +$m->get_ok( "http://localhost/stream", "get page" ); $m->content_contains( "hit number 1", "session data created" ); my $expired; -$m->cookie_jar->scan( sub { $expired = $_[8] } ); +$m->cookie_jar->scan( sub { $expired = $_[8]; } ); -$m->get_ok( "http://foo.com/page", "get page" ); +$m->get_ok( "http://localhost/page", "get page" ); $m->content_contains( "hit number 2", "session data restored" ); -$m->get_ok( "http://foo.com/stream", "get stream" ); +$m->get_ok( "http://localhost/stream", "get stream" ); $m->content_contains( "hit number 3", "session data restored" ); -sleep 2; +sleep 1; -$m->get_ok( "http://foo.com/page", "get stream" ); +$m->get_ok( "http://localhost/page", "get stream" ); $m->content_contains( "hit number 4", "session data restored" ); my $updated_expired; -$m->cookie_jar->scan( sub { $updated_expired = $_[8] } ); +$m->cookie_jar->scan( sub { $updated_expired = $_[8]; } ); cmp_ok( $expired, "<", $updated_expired, "cookie expiration was extended" ); -$m->get_ok( "http://foo.com/deleteme", "get page" ); +$m->get_ok( "http://localhost/deleteme", "get page" ); $m->content_is( 1, 'session id changed' );