6 use Test::More tests => 3;
7 use Test::MockObject::Extends;
11 BEGIN { use_ok( $m = "Catalyst::Plugin::Session" ) }
13 my $c = Test::MockObject::Extends->new($m);
17 get_session_data => sub {
19 return $key =~ /expire/ ? time() + 1000 : $flash;
22 $c->set_true("store_session_data");
23 #$c->set_always( _sessionid => "deadbeef" );
24 $c->set_always( config => { session => { expires => 1000 } } );
25 $c->set_always( stash => {} );
27 $c->sessionid('deadbeef');
28 is_deeply($c->sessionid(), 'deadbeef', "Session not set properly.");
30 $c->sessionid('deadbeef2');
32 is_deeply($c->sessionid(), 'deadbeef', "Session was stomped!.");