Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Loading…

For some odd reason, perl doesn't like the escaped single quote at the e... #274

Merged
merged 1 commit into from

1 participant

@jaredbischof

...nd of a range in a regular expression. Didn't figure out why, but moving it to a different position in the range fixed the issue. The User Registration page was not showing until this change was made.

@jaredbischof jaredbischof For some odd reason, perl doesn't like the escaped single quote at th…
…e end of a range in a regular expression. Didn't figure out why, but moving it to a different position in the range fixed the issue. The User Registration page was not showing until this change was made.
5e626d5
@jaredbischof jaredbischof merged commit 6f2d237 into MG-RAST:develop
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Commits on Mar 29, 2013
  1. @jaredbischof

    For some odd reason, perl doesn't like the escaped single quote at th…

    jaredbischof authored
    …e end of a range in a regular expression. Didn't figure out why, but moving it to a different position in the range fixed the issue. The User Registration page was not showing until this change was made.
This page is out of date. Refresh to see the latest.
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;
}
Something went wrong with that request. Please try again.