X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbackend.t;h=0b800a9a63196407ba7665248d5a78716594339b;hb=8d1afe4b74a5ede6dbeb4e01453e4a83f3309249;hp=aa0f6e9a5c6f8597947ae406af0951a56ad0b60a;hpb=1658508350f43b56a125c3d276b7af0ad7d9b8e8;p=catagits%2FCatalyst-Authentication-Store-Htpasswd.git diff --git a/t/backend.t b/t/backend.t index aa0f6e9..0b800a9 100644 --- a/t/backend.t +++ b/t/backend.t @@ -36,11 +36,11 @@ ok( $u->check_password( "s3cr3t" ), "password is s3cr3t"); ok( $m->user_supports(qw/session/), "user_supports session"); -is( $u->store, $o, "can get store"); +is( $u->_store, $o, "can get store"); can_ok( $m, "from_session" ); can_ok( $u, "for_session" ); -my $recovered = $u->store->from_session( undef, $u->for_session ); +my $recovered = $u->_store->from_session( undef, $u->for_session ); is( $recovered->username, $u->username, "recovery from session works");