The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
##@file
# Choice user backend file

##@class
# Choice user backend class
package Lemonldap::NG::Portal::PasswordDBChoice;

use strict;
use Lemonldap::NG::Portal::_Choice;
use Lemonldap::NG::Portal::Simple;

our $VERSION = '1.9.1';

## @apmethod int passwordDBInit()
# Does nothing
# @return Lemonldap::NG::Portal constant
sub passwordDBInit {
    my $self = shift;
    return $self->_choice->try( 'passwordDBInit', 2 );
}

## @apmethod int modifyPassword()
# Does nothing
# @return Lemonldap::NG::Portal constant
sub modifyPassword {
    my $self = shift;
    return $self->_choice->try( 'modifyPassword', 2 );
}

## @apmethod int passwordDBFinish()
# Does nothing
# @return Lemonldap::NG::Portal constant
sub passwordDBFinish {
    my $self = shift;
    return $self->_choice->try( 'passwordDBFinish', 2 );
}

1;