1 files changed, 1 insertions, 1 deletions
diff --git a/token.cgi b/token.cgi
index 76c1a2e11..b2cd790f4 100755
--- a/token.cgi
+++ b/token.cgi
@@ -229,7 +229,7 @@ sub changeEmail {
     my $quotednewemail = SqlQuote($new_email);
 
     # Check the user entered the correct old email address
-    if($::FORM{'email'} ne $old_email) {
+    if(lc($::FORM{'email'}) ne lc($old_email)) {
         ThrowUserError("email_confirmation_failed");
     }
     # The new email address should be available as this was