--- a/account.pm	Tue Jun 20 22:48:40 2006 +0000
+++ b/account.pm	Tue Jul 04 21:52:14 2006 +0000
@@ -344,7 +344,7 @@
     my $r = $ldap->search(
 	filter => $filter,
 	base => $ubase,
-	attrs => [qw/uid cn mail userPassword/]
+	#attrs => [qw/uid cn mail userPassword/, (AT_PRIMARYADDRESS)]
     );
     die $r->error if $r->code;