X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Plugin-Session-State-Cookie.git;a=blobdiff_plain;f=FastMmap.pm;h=ed6325d1f9c55ca86938ebea476d41f97a76151b;hp=c9c8113aaa2ad72ac7647bc5d21967a8bf0fb055;hb=ad142f4c9b9237b88a8872032591711050c17d3b;hpb=58c05d1a5d313dbe4f225efa72bf74d8df548c2e diff --git a/FastMmap.pm b/FastMmap.pm index c9c8113..ed6325d 100644 --- a/FastMmap.pm +++ b/FastMmap.pm @@ -9,7 +9,7 @@ use URI; use URI::Find; use File::Temp 'tempdir'; -our $VERSION = '0.05'; +our $VERSION = '0.06'; __PACKAGE__->mk_classdata('_session'); __PACKAGE__->mk_accessors('sessionid'); @@ -37,8 +37,10 @@ Fast sessions. sub finalize { my $c = shift; - my $redirect = $c->response->redirect; - $c->response->redirect( $c->uri($redirect) ) if $redirect; + unless ($c->config->{no_url_rewrite}) { + my $redirect = $c->response->redirect; + $c->response->redirect( $c->uri($redirect) ) if $redirect; + } if ( my $sid = $c->sessionid ) { $c->_session->set( $sid, $c->session ); my $set = 1; @@ -169,7 +171,7 @@ how many seconds until the session expires. defaults to 1 day How often should the system purge sessions. Defaults to 1 time per day. -=head auto_purge_on_set +=head3 auto_purge_on_set Is auto purge enabled? defaults to true.