Better user-exists message.

3 years ago · 92bcba214c
parent d3fba4c1e6
commit 92bcba214c
1 changed files with 3 additions and 0 deletions
--- a/Web/lib/MJB/Web/Controller/Auth.pm
+++ b/Web/lib/MJB/Web/Controller/Auth.pm
@ -31,6 +31,9 @@ sub do_register ( $c ) {
    push @{$c->stash->{errors}}, "Password must be at least 8 characters"
        unless length($password) >= 8;
    
+    push @{$c->stash->{errors}}, "That email address is already registered."
+        if $c->db->people( { email => $email } )->count;
+    
    return if $c->stash->{errors};

    my $person = try {