projects
/
virtual-ldap
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
cleanup dn from @domain since we extract it from e-mail
[virtual-ldap]
/
lib
/
LDAP
/
Koha.pm
diff --git
a/lib/LDAP/Koha.pm
b/lib/LDAP/Koha.pm
index
e0b70bf
..
b497c2f
100644
(file)
--- a/
lib/LDAP/Koha.pm
+++ b/
lib/LDAP/Koha.pm
@@
-229,6
+229,8
@@
sub search {
undef $entry;
}
+ $dn =~ s{@[^,]+}{};
+
$entry = Net::LDAP::Entry->new;
$entry->dn( $dn );