1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Fripost/Schema/Auth.pm b/lib/Fripost/Schema/Auth.pm
index f06ce4f..3bdda8f 100644
--- a/lib/Fripost/Schema/Auth.pm
+++ b/lib/Fripost/Schema/Auth.pm
@@ -23,7 +23,7 @@ use Net::LDAP;
 use Net::LDAP::Extension::SetPassword;
 use Authen::SASL;
 use Fripost::Schema::Util qw/canonical_dn ldap_explode_dn ldap_error
-                             split_addr assert softdie/;
+                             split_addr email_valid assert softdie/;
 
 
 =head1 METHODS
@@ -163,7 +163,7 @@ sub auth {
         $self->whoami( join ',', @{$options{ldap_bind_dn}} );
     }
     else {
-        return unless defined $user;
+        return unless email_valid($user, -nodie => 1, -exact => 1);
         $self->whoami( $self->mail2dn($user) );
     }