X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=lib%2FCatalyst%2FPlugin%2FAuthentication%2FStore%2FNDWeb.pm;h=218207774cae0e86c4195709e2b0f3fe0af0bcaf;hb=202d442fc929b5e4cea904406dc546098516fde1;hp=ff90aff08cd068e612014fd26ec8142a5a3d6673;hpb=49c23244b1ba61909b726bb9189665a33027a1af;p=ndwebbie.git diff --git a/lib/Catalyst/Plugin/Authentication/Store/NDWeb.pm b/lib/Catalyst/Plugin/Authentication/Store/NDWeb.pm index ff90aff..2182077 100644 --- a/lib/Catalyst/Plugin/Authentication/Store/NDWeb.pm +++ b/lib/Catalyst/Plugin/Authentication/Store/NDWeb.pm @@ -2,37 +2,25 @@ package Catalyst::Plugin::Authentication::Store::NDWeb; 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 { @@ -62,7 +50,7 @@ sub user_supports { NDWeb::User->supports( @_ ); } -__PACKAGE__; +__PACKAGE__->meta->make_immutable; __END__