X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Plugin-Session-State-Cookie.git;a=blobdiff_plain;f=t%2Fbasic.t;h=843ff26c7b5f064138f9ffeac3b8fb8963585e90;hp=9620451c913ab459df94534e42f4b30ab55c0bb1;hb=8bdcbb468aedff34275a7fb30b18ea8be066255b;hpb=2bde9162132ed51c98e86106f3b9be65459c12a3 diff --git a/t/basic.t b/t/basic.t index 9620451..843ff26 100644 --- a/t/basic.t +++ b/t/basic.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::More tests => 10; +use Test::More tests => 13; use Test::MockObject; use Test::MockObject::Extends; @@ -71,3 +71,14 @@ is_deeply( { session => { value => $sessionid, expires => 123 } }, "cookie was set correctly" ); + +$cxt->clear; +$req->clear; + +can_ok( $m, "cookie_is_rejecting" ); + +%req_cookies = ( path => '/foo' ); +$req->set_always( path => '/' ); +ok( $cxt->cookie_is_rejecting(\%req_cookies), "cookie is rejecting" ); +$req->set_always( path => '/foo/bar' ); +ok( !$cxt->cookie_is_rejecting(\%req_cookies), "cookie is not rejecting" );