use strict;
use warnings;
use Moose;
+use MRO::Compat;
use NDWeb::Auth::User;
sub setup {
my $c = shift;
- $c->default_auth_store(
- Catalyst::Plugin::Authentication::Store::NDWeb->new(
- )
- );
+ $c->default_auth_store(
+ Catalyst::Plugin::Authentication::Store::NDWeb->new(
+ )
+ );
- $c->NEXT::setup(@_);
+ $c->next::method(@_);
}
-sub new {
- my ( $class ) = @_;
-
- my $self = {
- };
-
- bless $self, $class;
-}
-
sub from_session {
my ( $self, $c, $frozenuser ) = @_;
NDWeb::User->supports( @_ );
}
-__PACKAGE__;
+__PACKAGE__->meta->make_immutable;
__END__