X-Git-Url: https://git.octo.it/?p=licom.git;a=blobdiff_plain;f=lib%2FLiCoM%2FPerson.pm;fp=lib%2FLiCoM%2FPerson.pm;h=3c43a4b89a1bb2a85a1b7febb455648181e7a974;hp=4ba1be41aa3c1f887e0b3e8b334926e275f7127b;hb=89c58aa0c99bc2fd168fda98891ac2962ff16c94;hpb=6da463204f0e7002e9f43e1492846833b60457a0

diff --git a/lib/LiCoM/Person.pm b/lib/LiCoM/Person.pm
index 4ba1be4..3c43a4b 100644
--- a/lib/LiCoM/Person.pm
+++ b/lib/LiCoM/Person.pm
@@ -165,8 +165,8 @@ sub create
 		return (undef);
 	}
 
-	$dn = "cn=$sn $gn," . get_config ('base_dn');
-	($ou) = get_config ('base_dn') =~ m/\bou\s*=\s*([^,]+)/i;
+	$ou = 'Person';
+	$dn = "cn=$sn $gn,ou=$ou," . get_config ('base_dn');
 	
 	$entry->add (cn => "$sn $gn", ou => $ou);
 	$entry->dn ($dn);
@@ -257,7 +257,7 @@ sub search
 
 	$mesg = $Ldap->search
 	(
-		base   => get_config ('base_dn'),
+		base   => 'ou=Person,' . get_config ('base_dn'),
 		filter => $filter
 	);
 
@@ -297,7 +297,7 @@ sub get_user
 
 	my $mesg = $Ldap->search
 	(
-		base   => get_config ('base_dn'),
+		base   => 'ou=Person,' . get_config ('base_dn'),
 		filter => "(cn=$search)"
 	);
 
@@ -360,7 +360,7 @@ sub _update_dn
 	my $sn = $obj->{'sn'};
 	my $gn = $obj->{'givenName'};
 	my $cn = "$sn $gn";
-	my $dn = "cn=$cn," . get_config ('base_dn');
+	my $dn = "cn=$cn,ou=Person," . get_config ('base_dn');
 
 	$obj->{'cn'} = $cn;