NAME

OpusVL::AppKit::RolesFor::Auth

VERSION

version 6

SYNOPSIS

package FailLogin;
use Moose;
with 'OpusVL::AppKit::RolesFor::Auth';

sub check_password 
{
    my ($self, $user, $password) = @_;
    return 0;
}

DESCRIPTION

This role is used to supply a method for authenticating a users password.

NAME

OpusVL::AppKit::RolesFor::Auth

METHODS

check_password

The role expects the classes that support it to implement the check_password method which should take a username and password and return 0 or 1 depending on whether the password is correct.

$obj->check_password('user', 'password'); # return 0 or 1

SEE ALSO

See OpusVL::AppKit::LDAPAuth for an example of this role in use.

AUTHOR

Colin Newell <colin@opusvl.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by OpusVL.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.