X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FRemoteTestApp2.pm;h=159020fc99ebe95c20594ba493456bce13fac397;hb=87d186b172c2979a308e883baa1c72cebb1a7d30;hp=6aa267542afd20129168d6124b9a81d5ed73ec66;hpb=69be7d10bf6e0a33db97b455571423e7e6e0eac2;p=catagits%2FCatalyst-Plugin-Authentication.git diff --git a/t/lib/RemoteTestApp2.pm b/t/lib/RemoteTestApp2.pm index 6aa2675..159020f 100644 --- a/t/lib/RemoteTestApp2.pm +++ b/t/lib/RemoteTestApp2.pm @@ -1,4 +1,6 @@ package RemoteTestApp2; +use strict; +use warnings; use Catalyst qw/ Authentication @@ -27,24 +29,7 @@ __PACKAGE__->config( }, ); -sub default : Local { - my ( $self, $c ) = @_; - if ($c->authenticate()) { - $c->res->body( - 'my_user_name:' - . $c->user->{my_user_name} - ); - } - else { - $c->res->body('FAIL'); - $c->res->status(403); - } -} - -sub public : Local { - my ( $self, $c ) = @_; - $c->res->body('OK'); -} - __PACKAGE__->setup; +1; +