Use last and panne_level in emails/broken

git-svn-id: svn+ssh://murphy/home/svn/platal/trunk@772 839d8a87-29fc-0310-9880-83ba4fa771e5

diff --git a/modules/email.php b/modules/email.php
index 0e7a1b4..ef34aac 100644 (file)
--- a/modules/email.php
+++ b/modules/email.php
@@ -370,7 +370,15 @@ L'
                 if ($x = $sel->fetchOneAssoc()) {
                     // on écrit dans la base que l'adresse est cassée
                     if (!$x['panne']) {
-                        XDB::execute("UPDATE emails SET panne=NOW() WHERE email = {?}", $email);
+                        XDB::execute("UPDATE emails
+                                         SET panne=NOW(),
+                                             last=NOW(),
+                                             panne_level = 1
+                                       WHERE email = {?}", $email);
+                    } else {
+                        XDB::execute("UPDATE emails
+                                         SET panne_level = 1
+                                       WHERE email = {?} AND panne_level = 0");
                     }
                     $page->assign_by_ref('x', $x);
                 }