Changeset 194

Timestamp:

05/26/09 19:51:57 (15 years ago)

Author:

nanardon

Message:

• don't return before giving the error message

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad.pm (modified) (2 diffs)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad.pm

@@ -112 +112 @@
 
     $ldap or do {
-        warn "Cannot to ldap server";
+        warn "Cannot connect to ldap server";
         return; # connot connect to any ldap :\
     };
@@ -119 +119 @@
     $login =~ m/@/ or $login .= '@' . $self->ad_domain;
 
-    my $msg = $ldap->bind($login, password => $self->{_password}) or return;
+    my $msg = $ldap->bind($login, password => $self->{_password});
     $msg->code and do {
         warn $msg->error;