summaryrefslogtreecommitdiffstats
path: root/token.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'token.cgi')
-rwxr-xr-xtoken.cgi2
1 files changed, 2 insertions, 0 deletions
diff --git a/token.cgi b/token.cgi
index 43ee1b04e..86e51939d 100755
--- a/token.cgi
+++ b/token.cgi
@@ -265,6 +265,7 @@ sub changeEmail {
SendSQL("DELETE FROM tokens WHERE userid = $userid
AND tokentype = 'emailnew'");
SendSQL("UNLOCK TABLES");
+ DeriveGroup($userid);
# Return HTTP response headers.
print "Content-Type: text/html\n\n";
@@ -300,6 +301,7 @@ sub cancelChangeEmail {
SET login_name = $quotedoldemail
WHERE userid = $userid");
SendSQL("UNLOCK TABLES");
+ DeriveGroup($userid);
$vars->{'message'} .=
" Your old account settings have been reinstated.";
}