TypeKey: $store->get_user( \%params, \%result ) made into $store->get( $username...
[catagits/Catalyst-Authentication-Credential-HTTP-Proxy.git] / t / basic.t
index 3164863..dd1b277 100644 (file)
--- a/t/basic.t
+++ b/t/basic.t
@@ -43,7 +43,7 @@ $tk->mock(
 
 my $store = Test::MockObject->new;
 $store->mock( get_user =>
-      sub { shift; Catalyst::Plugin::Authentication::User::Hash->new(@_) } );
+      sub { shift; Catalyst::Plugin::Authentication::User::Hash->new($_[2]) } );
 
 my $c = Test::MockObject::Extends->new($m);
 $c->set_always( config => {} );