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=52cba05d0293cf4ddf33eef2af533ff63b7f9d44;hp=526aebafbb0eb40a013e3dffad85fef3b2fde72e;hb=74586782a63bf750618a42e0a5d5ea1549a65ede;hpb=db1cda22b4b70937a8fd6f3c105082985baacce7 diff --git a/t/basic.t b/t/basic.t index 526aeba..52cba05 100644 --- a/t/basic.t +++ b/t/basic.t @@ -27,7 +27,8 @@ my $cxt = $cxt->set_always( config => {} ); $cxt->set_always( request => $req ); $cxt->set_always( response => $res ); -$cxt->set_always( session => { __expires => 123 } ); +$cxt->set_always( session => { } ); +$cxt->set_always( session_expires => 123 ); $cxt->set_false("debug"); my $sessionid; $cxt->mock( sessionid => sub { shift; $sessionid = shift if @_; $sessionid } ); @@ -36,8 +37,10 @@ can_ok( $m, "setup_session" ); $cxt->setup_session; -is( $cxt->config->{session}{cookie_name}, - "session", "default cookie name is set" ); +like( $cxt->config->{session}{cookie_name}, + qr/_session$/, "default cookie name is set" ); + +$cxt->config->{session}{cookie_name} = "session"; can_ok( $m, "prepare_cookies" ); @@ -58,9 +61,11 @@ $res->clear; can_ok( $m, "finalize_cookies" ); $cxt->finalize_cookies; -{ local $TODO = "This check is a pain to write, should be done by catalyst itself"; -ok( !$res->called("cookies"), - "response cookie was not set since res cookie is already there" ); +{ + local $TODO = + "This check is a pain to write, should be done by catalyst itself"; + ok( !$res->called("cookies"), + "response cookie was not set since res cookie is already there" ); } $cxt->clear;