From 2bece6abde54881bb074dd44e7f87885eab4a777 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@fripost.org>
Date: Sat, 29 Sep 2012 02:03:21 +0200
Subject: Proper escaping of URIs.

---
 lib/Fripost/Schema/Mailbox.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Fripost/Schema/Mailbox.pm')

diff --git a/lib/Fripost/Schema/Mailbox.pm b/lib/Fripost/Schema/Mailbox.pm
index 95e2d10..ce23d98 100644
--- a/lib/Fripost/Schema/Mailbox.pm
+++ b/lib/Fripost/Schema/Mailbox.pm
@@ -134,8 +134,8 @@ sub add {
     }
 
     eval {
+        die "Missing user name\n" unless $m->{user} =~ /^.+\@.+$/;
         my ($l,$d) = split /\@/, email_to_ascii($m->{user}), 2;
-        die "Missing user name\n" if $l eq '';
         &_is_valid($m);
         die "‘".$m->{user}."’ already exists\n"
             if $self->local->exists($m->{user},%options);
-- 
cgit v1.2.3