bug 157756 - Groups_20020716_Branch Tracking : > 55 groups now supported

r=bbaetz, gerv

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.";
         }