package CommitBit::CurrentUser;

use warnings;
use strict;

use base 'Jifty::CurrentUser';

sub password_is {
    my $self = shift;
    my $pass = shift;
    return 1 if ( $self->user_object->__value('password') eq $pass );
    return undef;

}

sub _init {
    my $self = shift;
    my %args = (@_);

    if ( delete $args{'_bootstrap'} ) {
        $self->is_bootstrap_user(1);
    } elsif ( keys %args ) {
        $self->user_object(
            CommitBit::Model::User->new( current_user => $self ) );
        $self->user_object->load_by_cols(%args);
    }
    $self->SUPER::_init(%args);
}

1;


syntax highlighted by Code2HTML, v. 0.9.1