X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=include%2Femails.inc.php;fp=include%2Femails.inc.php;h=4da465780e8bb90290835e4ac2f138e6c920ac09;hb=db05227fb8b7bd40b72e4c13699deddf836364b8;hp=2cf14d8c16ddb6256decbf34ab9aab5eb3373bfe;hpb=c846452b76c8a595173a2dc63c912cc4ed105b05;p=platal.git

diff --git a/include/emails.inc.php b/include/emails.inc.php
index 2cf14d8..4da4657 100644
--- a/include/emails.inc.php
+++ b/include/emails.inc.php
@@ -816,9 +816,10 @@ class Redirect
         XDB::execute('REPLACE INTO  email_redirect_account (uid, redirect, flags, action)
                             VALUES  ({?}, {?}, \'active\', {?})',
                      $this->user->id(), $email, $filter);
+        // Replace this email by forlife email, if present in aliases and MLs.
         $listClient = new MMList(S::user());
-        $listClient->change_user_email($this->user->forlifeEmail(), $new_email);
-        update_alias_user($this->user->forlifeEmail(), $new_email);
+        $listClient->change_user_email($email, $this->user->forlifeEmail());
+        update_alias_user($email, $this->user->forlifeEmail());
         if ($logger = S::v('log', null)) { // may be absent --> step4.php
             S::logger()->log('email_add', $email . ($this->user->id() != S::v('uid') ? " (admin on {$this->user->login()})" : ""));
         }