X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FPlack%2FSession%2FState%2FCookie.pm;h=12631d4e624a4ae616c8dd8345ad8c7977ddfdc8;hb=56b9910ade55c45aba166efd202fa5f517b965f1;hp=e723d8e2aacc44ecc746171e472d9ee5791ea08d;hpb=ad80e445cc00cc971715c26dc1e636985d9d96b7;p=catagits%2FWeb-Session.git diff --git a/lib/Plack/Session/State/Cookie.pm b/lib/Plack/Session/State/Cookie.pm index e723d8e..12631d4 100644 --- a/lib/Plack/Session/State/Cookie.pm +++ b/lib/Plack/Session/State/Cookie.pm @@ -17,9 +17,14 @@ sub expire_session_id { $self->expires( 0 ); } +sub get_request_session_id { + my ($self, $request ) = @_; + ($request->cookie( $self->session_key ) || return )->value; +} + sub extract { my ($self, $request) = @_; - $self->check_expired( ( $request->cookie( $self->session_key ) || return )->value ); + $self->check_expired( $self->get_request_session_id($request) || return ); } sub finalize {