use strict;
use warnings;
-use base qw/Class::Accessor::Fast/;
+use Moose;
+use MRO::Compat;
use NDWeb::Auth::User;
our $VERSION= "0.104";
-BEGIN {
- #__PACKAGE__->mk_accessors(qw/config/);
-}
-
sub setup {
my $c = shift;
- $c->default_auth_store(
- Catalyst::Plugin::Authentication::Store::NDWeb->new(
- )
- );
-
- $c->NEXT::setup(@_);
-
-}
-
-sub new {
- my ( $class ) = @_;
+ $c->default_auth_store(
+ Catalyst::Plugin::Authentication::Store::NDWeb->new(
+ )
+ );
- my $self = {
- };
+ $c->next::method(@_);
- bless $self, $class;
}
sub from_session {
NDWeb::User->supports( @_ );
}
-__PACKAGE__;
+__PACKAGE__->meta->make_immutable;
__END__