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=aa78b68fcb9e8880a20012e81d6d1bda413255e3;hp=ea32870c4c02d0a65057bf089c7c51d36edd2402;hb=7acfe95d356e31f93bfbebfbadd0088974080299;hpb=5e50008f1cfc2adca19810a28c1680e0221f2492 diff --git a/t/basic.t b/t/basic.t index ea32870..aa78b68 100644 --- a/t/basic.t +++ b/t/basic.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::More tests => 13; +use Test::More tests => 15; use Test::MockObject; use Test::MockObject::Extends; @@ -24,12 +24,21 @@ $res->set_always( cookies => \%res_cookies ); my $cxt = Test::MockObject::Extends->new("Catalyst::Plugin::Session::State::Cookie"); +$cxt->set_always( config => { } ); $cxt->set_always( request => $req ); $cxt->set_always( response => $res ); $cxt->set_false("debug"); my $sessionid; $cxt->mock( sessionid => sub { shift; $sessionid = shift if @_; $sessionid } ); + +can_ok( $m, "setup_session" ); + +$cxt->setup_session; + +is( $cxt->config->{session}{cookie_name}, "session", "default cookie name is set" ); + + can_ok( $m, "prepare_cookies" ); $cxt->prepare_cookies;