Added a failing test for a situation that occurs when you have a cookie for a session...

[catagits/Catalyst-Plugin-Session.git] / t / lib / SessionValid / Controller / Root.pm

diff --git a/t/lib/SessionValid/Controller/Root.pm b/t/lib/SessionValid/Controller/Root.pm
new file mode 100644 (file)
index 0000000..9d6581d
--- /dev/null
+++ b/t/lib/SessionValid/Controller/Root.pm
@@ -0,0 +1,17 @@
+package SessionValid::Controller::Root;
+use strict;
+use warnings;
+use Data::Dumper;
+
+use base qw/Catalyst::Controller/;
+
+__PACKAGE__->config( namespace => '' );
+
+sub index :Path :Args(0) {
+    my ( $self, $c ) = @_;
+    $c->session->{'value'} = 'value set';
+    $c->session_is_valid;
+    $c->res->output($c->session->{'value'});
+}
+
+1;