Prove detaching is caught, needs another test to throw a different exception and...

[catagits/Catalyst-Plugin-Authentication.git] / t / lib / Catalyst / Authentication / Credential / AlwaysDetach.pm

package Catalyst::Authentication::Credential::AlwaysDetach;
use strict;
use warnings;

sub new {
    bless {}, __PACKAGE__;
}

sub authenticate {
    my ( $self, $c, $realm, $auth_info ) = @_;
    $c->detach;
}

no Moose;
1;