LDAP in progress (#595)
This commit is contained in:
parent
0aa2c4c76f
commit
566dbcc9e2
|
@ -46,7 +46,8 @@ has ldap => (
|
||||||
has ldapGroupAttributeNameSearch => (
|
has ldapGroupAttributeNameSearch => (
|
||||||
is => 'rw',
|
is => 'rw',
|
||||||
builder => sub {
|
builder => sub {
|
||||||
return [
|
return $_[0]->{conf}->{ldapGroupAttributeNameSearch}
|
||||||
|
? [
|
||||||
split( /\s+/, $_[0]->{conf}->{ldapGroupAttributeNameSearch} ),
|
split( /\s+/, $_[0]->{conf}->{ldapGroupAttributeNameSearch} ),
|
||||||
|
|
||||||
# Push group attribute value for recursive search
|
# Push group attribute value for recursive search
|
||||||
|
@ -56,7 +57,8 @@ has ldapGroupAttributeNameSearch => (
|
||||||
? $_[0]->{conf}->{ldapGroupAttributeNameGroup}
|
? $_[0]->{conf}->{ldapGroupAttributeNameGroup}
|
||||||
: ()
|
: ()
|
||||||
)
|
)
|
||||||
];
|
]
|
||||||
|
: [];
|
||||||
}
|
}
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@ -96,7 +98,7 @@ s/\$req->\{sessionInfo\}->\{(_?password|mail)\}/\$req->{datas}->{$1}/g;
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
1;
|
$self->ldap and $self->filter;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub getUser {
|
sub getUser {
|
||||||
|
|
Loading…
Reference in New Issue
Block a user