From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 15 Sep 2009 13:10:13 +0000 (+0000)
Subject: cleanup dn from @domain since we extract it from e-mail
X-Git-Url: http://git.rot13.org/?p=virtual-ldap;a=commitdiff_plain;h=9321cb27258346136fb30f0e909c43d1020ed645;hp=df535c72d73502e74b72f4b4f1bbd6b1b7b629dc

cleanup dn from @domain since we extract it from e-mail
---

diff --git a/lib/LDAP/Koha.pm b/lib/LDAP/Koha.pm
index e0b70bf..b497c2f 100644
--- 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 );