Permalink
Browse files

Merge pull request #274 from jaredbischof/develop

For some odd reason, perl doesn't like the escaped single quote at the e...
  • Loading branch information...
2 parents e0c7abb + 5e626d5 commit 6f2d2373475ad4e17d5797c714b9f9e5b0dc1e66 @jaredbischof jaredbischof committed Mar 29, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/WebApplication/WebComponent/Register.pm
View
2 src/WebApplication/WebComponent/Register.pm
@@ -212,7 +212,7 @@ sub perform_registration {
}
# check if email address is valid
- unless ($cgi->param('email') =~ /^[\d\w\.-\']+\@[\d\w\.-]+\.[\w+]$/) {
+ unless ($cgi->param('email') =~ /^[\d\w\.\'-]+\@[\d\w\.-]+\.[\w+]$/) {
$application->add_message('warning', 'You must enter a valid eMail address.');
return 0;
}

0 comments on commit 6f2d237

Please sign in to comment.