Prep for new release
[catagits/Catalyst-Plugin-Session-State-Cookie.git] / t / lib / CookieTestApp.pm
index 15fdeab..55703f6 100644 (file)
@@ -1,34 +1,17 @@
 package # Hide from PAUSE
   CookieTestApp;
+use strict;
+use warnings;
+
+use base qw/Catalyst/;
 use Catalyst qw/
   Session
   Session::Store::Dummy
   Session::State::Cookie
   /;
 
-__PACKAGE__->config->{session} = { cookie_secure => 2 };
-
-sub page : Local {
-    my ( $self, $c ) = @_;
-    $c->res->body( "Hi! hit number " . ++$c->session->{counter} );
-}
-
-sub stream : Local {
-    my ( $self, $c ) = @_;
-    my $count = ++$c->session->{counter};
-    $c->res->write("hit number ");
-    $c->res->write($count);
-}
-
-sub deleteme : Local {
-    my ( $self, $c ) = @_;
-    my $id = $c->get_session_id;
-    $c->delete_session;
-    my $id2 = $c->get_session_id;
-    $c->res->body( $id ne ( $id2 || '' ) );
-}
+__PACKAGE__->config('Plugin::Session' => { cookie_secure => 2 });
 
 __PACKAGE__->setup;
 
 1;
-