[Catalyst-commits] r12308 - Catalyst-Authentication-Store-LDAP/trunk/lib/Catalyst/Authentication/Store/LDAP

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-12-11 13:39:08 +0000 (Fri, 11 Dec 2009)
New Revision: 12308

Modified:
   Catalyst-Authentication-Store-LDAP/trunk/lib/Catalyst/Authentication/Store/LDAP/Backend.pm
Log:
Fix bug that results in you getting the user back as your  object

Modified: Catalyst-Authentication-Store-LDAP/trunk/lib/Catalyst/Authentication/Store/LDAP/Backend.pm
===================================================================
--- Catalyst-Authentication-Store-LDAP/trunk/lib/Catalyst/Authentication/Store/LDAP/Backend.pm	2009-12-11 12:44:55 UTC (rev 12307)
+++ Catalyst-Authentication-Store-LDAP/trunk/lib/Catalyst/Authentication/Store/LDAP/Backend.pm	2009-12-11 13:39:08 UTC (rev 12308)
@@ -298,7 +298,7 @@
     }
     my $usersearch = $ldap->search(@searchopts);
 
-    return if ( $usersearch->is_error );
+    return undef if ( $usersearch->is_error );
 
     my $userentry;
     my $user_field     = $self->user_field;