6 |
use Net::LDAP; |
use Net::LDAP; |
7 |
use Data::Dump qw/dump/; |
use Data::Dump qw/dump/; |
8 |
use base qw(Jifty::Object Class::Accessor::Fast); |
use base qw(Jifty::Object Class::Accessor::Fast); |
9 |
|
use Jifty; |
10 |
our @config_fields = keys %{ Jifty->config->app('LDAP') }; |
our @config_fields = keys %{ Jifty->config->app('LDAP') }; |
11 |
Jifty->log->debug("using fields from configuration: ",dump( @config_fields )); |
Jifty->log->debug("using fields from configuration: ",dump( @config_fields )); |
12 |
__PACKAGE__->mk_accessors( qw(ldap current_search), @config_fields ); |
__PACKAGE__->mk_accessors( qw(ldap current_search), @config_fields ); |