BEGIN {
eval { require Catalyst::Plugin::Session; require Catalyst::Plugin::Session::State::Cookie };
plan skip_all => "This test needs Catalyst::Plugin::Session and Catalyst::Plugin::Session::State::Cookie installed" if $@;
- plan tests => 12;
+ plan tests => 14;
}
{
my ( $self, $c ) = @_;
ok(!$c->sessionid, "no session id yet");
+ ok(!$c->user_exists, "no user exists");
ok(!$c->user, "no user yet");
ok($c->login( "foo", "s3cr3t" ), "can login with clear");
is( $c->user, $users->{foo}, "user object is in proper place");
my ( $self, $c ) = @_;
ok( $c->sessionid, "session ID was restored" );
+ ok( $c->user_exists, "user exists" );
ok( $c->user, "a user was also restored");
is_deeply( $c->user, $users->{foo}, "restored user is the right one (deep test - store might change identity)" );