Use wiki as documentation in emails/broken and add to link to marketing/broken

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

diff --git a/modules/email.php b/modules/email.php
index 1badbd8..04677e7 100644 (file)
--- a/modules/email.php
+++ b/modules/email.php
@@ -268,6 +268,8 @@ class EmailModule extends PLModule
 
     function handler_submit(&$page)
     {
+        require_once('wiki.inc.php');
+        wiki_require_page('Xorg.Mails');
         $page->changeTpl('emails/submit_spam.tpl');
 
         if (Post::has('send_email')) {
@@ -367,6 +369,8 @@ class EmailModule extends PLModule
     function handler_broken(&$page, $warn = null, $email = null)
     {
         require_once 'emails.inc.php';
+        require_once('wiki.inc.php');
+        wiki_require_page('Xorg.PatteCassée');
 
         global $globals;
 
@@ -425,12 +429,13 @@ L'
                 $page->assign('email',$email);
                 $sel = XDB::query(
                         "SELECT  e1.uid, e1.panne != 0 AS panne, count(e2.uid) AS nb_mails,
-                                 u.nom, u.prenom, u.promo
+                                 u.nom, u.prenom, u.promo, a.alias AS forlife
                            FROM  emails as e1
                       LEFT JOIN  emails as e2 ON(e1.uid = e2.uid 
                                                  AND FIND_IN_SET('active', e2.flags)
                                                  AND e1.email != e2.email)
                      INNER JOIN  auth_user_md5 as u ON(e1.uid = u.user_id)
+                     INNER JOIN  aliases AS a ON (a.id = e1.uid AND a.type = 'a_vie')
                           WHERE  e1.email = {?}
                        GROUP BY  e1.uid", $email);
                 if ($x = $sel->fetchOneAssoc()) {
@@ -444,7 +449,7 @@ L'
                     } else {
                         XDB::execute("UPDATE emails
                                          SET panne_level = 1
-                                       WHERE email = {?} AND panne_level = 0");
+                                       WHERE email = {?} AND panne_level = 0", $email);
                     }
                     $page->assign_by_ref('x', $x);
                 }

diff --git a/templates/emails/broken.tpl b/templates/emails/broken.tpl
index e3d376c..5a590e5 100644 (file)
--- a/templates/emails/broken.tpl
+++ b/templates/emails/broken.tpl
@@ -20,7 +20,7 @@
 {*                                                                        *}
 {**************************************************************************}
 
-<h1>Vérifier une patte cassée</h1>
+<h1>Indiquer</h1>
 
 {if $neuneu}
 <h2 class='erreur'>Erreur !</h2>
@@ -31,13 +31,10 @@ Tu as entr
 
 <p>
 En effet, il faut nous donner l'adresse qui se cache derrière l'adresse polytechnicienne de ton
-correspondant si tu veux que nous puissions te répondre. Cette
-<a href="Xorg/PatteCass%E9e">documentation</a> peut t'aider à trouver cette
-information.
+correspondant si tu veux que nous puissions te répondre.
 </p>
-
-<h2>Patte Cassée</h2>
 {elseif $x && $x.nb_mails}
+<h2>Patte Cassée</h2>
   <p>
     Ton correspondant a à l'heure actuelle <span class="erreur">{$x.nb_mails} adresse(s) email(s) de redirection active(s)
     en dehors de celle que tu nous as communiquée</span>. Cela ne veut pas forcément dire qu'il les avait
@@ -49,6 +46,7 @@ information.
     <a href="emails/broken/warn/{$email}">clique sur ce lien</a>.
   </p>
 {elseif $x}
+<h2>Patte Cassée</h2>
   <p>
     Désolé, mais ton correspondant, {$x.prenom} {$x.nom} (X{$x.promo}),
     n'a actuellement <span class="erreur">aucune adresse email de redirection 
@@ -56,34 +54,16 @@ information.
     Nous t'invitons à prendre contact avec lui autrement que par email,
     l'idéal étant de l'informer si possible que sa patte Polytechnique.org est cassée...!
   </p>
+  <p>
+    Si tu connais une autre adresse email où le contacter, nous pouvez l'inviter à mettre à jour sa redirection
+    Polytechnique.org. Pour ceci il suffit que tu remplisses <a href="marketing/broken/{$x.forlife}">ce fomulaire</a>.
+  </p>
 {elseif $email}
 <p class="erreur">
   Désolé mais plus personne n'utilise l'adresse {$email} comme adresse de redirection.
   Nous ne pouvons donc malheureusement te fournir aucune information...
 </p>
 {/if}
-
-<p>
-  <strong>Qu'est-ce qu'une patte cassée ?</strong>
-</p>
-<p>
-    Cette page sert à <strong>analyser les messages d'erreur</strong> que tu reçois
-    lorsque tu envoies un mail à des utilisateurs de Polytechnique.org. Plus
-    précisément, si après avoir rédigé un email, tu reçois en retour un message
-    t'indiquant que l'un des destinataires n'a pas eu ton message sur l'une de
-    ses adresses de redirections, nous allons pouvoir te dire s'il a reçu ton
-    email sur une autre adresse de redirection...!
-</p>
-<p>
-    Pour plus d'explications concernant cette page, nous t'invitons à consulter
-    la <a href="Xorg/PatteCass%E9e">documentation suivante</a>
-</p>
-<p>
-    Rentre dans la zone de saisie ci-dessous l'adresse email à laquelle ton
-    courrier n'a pas été distribué puis valide. Nous te dirons si le
-    destinataire possède d'autres adresses de redirection grâce auxquelles il a
-    tout de même eu ton message.
-</p>
 <br />
 <div class="center">
   <form action="emails/broken" method="post">
@@ -101,4 +81,6 @@ information.
   </form>
 </div>
 
+{include file=../spool/wiki.d/cache_Xorg.PatteCassée.tpl from=form}
+
 {* vim:set et sw=2 sts=2 sws=2: *}