X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FSessionTestApp%2FController%2FRoot.pm;h=0afc633814bc2c53d50e6d71c217f9ecb0849fb2;hb=71bde3b4ab4e43c0e14ec29cd5c13df87d9692db;hp=59559b92b2a69a5aa889e8837854954ac040c944;hpb=d32c2b5a296ba28892d19b3dae499630ae89e630;p=catagits%2FCatalyst-Plugin-Session.git

diff --git a/t/lib/SessionTestApp/Controller/Root.pm b/t/lib/SessionTestApp/Controller/Root.pm
index 59559b9..0afc633 100644
--- a/t/lib/SessionTestApp/Controller/Root.pm
+++ b/t/lib/SessionTestApp/Controller/Root.pm
@@ -28,6 +28,19 @@ sub logout : Global {
     $c->delete_session("logout");
 }
 
+sub logout_redirect : Global {
+    my ( $self, $c ) = @_;
+
+    $c->logout;
+    $c->res->output("redirect from here");
+    $c->res->redirect( $c->uri_for('from_logout_redirect') );
+}
+
+sub from_logout_redirect : Global {
+    my ( $self, $c ) = @_;
+    $c->res->output( "got here from logout_redirect" );
+}
+
 sub set_session_variable : Global {
     my ( $self, $c, $var, $val ) = @_;
     $c->session->{$var} = $val;
@@ -108,9 +121,15 @@ sub dump_these_loads_session : Global {
     }
 }
 
-sub extend_session_expires : Global {
+sub change_session_expires : Global {
+    my ($self, $c) = @_;
+    $c->change_session_expires(31536000);
+    $c->res->output($c->session_expires);
+}
+
+sub reset_session_expires : Global {
     my ($self, $c) = @_;
-    $c->extend_session_expires(31536000);
+    $c->reset_session_expires;
     $c->res->output($c->session_expires);
 }