use warnings;
use strict;
package Jifty::Plugin::Login::CurrentUser;
use base qw/Jifty::CurrentUser Jifty::Plugin::Login/;
=head2 new PARAMHASH
Instantiate a new current user object, loading the user by paramhash:
my $item = Jifty::Plugin::Login::Model::Item->new( Jifty::Plugin::Login::CurrentUser->new(email => 'user@site'));
if you give the param
_bootstrap => 1
your object will be marked as a bootstrap user. You can use that to do an endrun around acls.
=cut
sub _init {
my $self = shift;
my %args = (@_);
my $LoginUserClass = $self->LoginUserClass;
if (delete $args{'_bootstrap'} ) {
$self->is_bootstrap_user(1);
} elsif (keys %args) {
$self->user_object($LoginUserClass->new(current_user => $self));
$self->user_object->load_by_cols(%args);
}
$self->SUPER::_init(%args);
}
1;