Parcourir la source

- modif de la syntaxe markdown
- rajout du mail pour pouvoir le c/c

Daniel Jakots il y a 10 ans
Parent
commit
1ceff497c9
1 fichiers modifiés avec 22 ajouts et 9 suppressions
  1. 22 9
      pad-ffdn.pl

+ 22 - 9
pad-ffdn.pl

@@ -77,22 +77,35 @@ switch ($nummois) {
 }
 say "Quel est le lien de la réunion précédente ?";
 my $padprecedent= <> ; chomp $padprecedent;
- 
+
 my $filename = $pad_dir."pad-suivi.md";
 my $fh;
 open ($fh, '>', $filename) or die "Impossible d'ouvrir le fichier $filename en écriture";
+
+say $fh "Le mail à envoyer : ";
+say $fh "Bonjour à tou⋅te⋅s,
+
+C’est aujourd’hui que le sondage se finit. La date ayant reçu le plus de
+suffrages est :
+\tJOUR $jour $mois $annee
+\tsur #ffdn-suivi (serveur irc.geeknode.org)
+\thttps://pad.ilico.org/p/ffdn-$annee$nummois$jour
+
+Merci de bien remplir le pad et de ne pas le faire à la dernière minute,
+c’est pas pratique pour la réunion sinon.";
+say $fh "-";
 say $fh "Le lien du pad sera https://pad.ilico.org/p/ffdn-$annee$nummois$jour";
-say $fh "-"x36;
-say $fh "**Réunion de suivi de la Fédération FDN du $jour $mois $annee.**";
-say $fh "*(20h, sur #ffdn-suivi irc://irc.geeknode.org)*";
+say $fh "-";
+say $fh "# Réunion de suivi de la Fédération FDN du $jour $mois $annee.";
+say $fh "(20h, sur #ffdn-suivi irc://irc.geeknode.org)";
 say $fh "";
 say $fh "Pad de la réunion précédente : $padprecedent";
 say $fh "";
-say $fh "**Ordre du jour :**";
+say $fh "## Ordre du jour :";
 say $fh "";
 say $fh "* Nouvelles des membres";
 say $fh "";
-say $fh "**Règles de bonne conduite**
+say $fh "## Règles de bonne conduite
 
 ==============================================================
 
@@ -120,16 +133,16 @@ Indiquer en face de votre prénom si vous souhaitez être pilote, et, le cas éc
 
 ==============================================================";
 say $fh "";
-say $fh "**Les points de l'Ordre du jour abordés**";
+say $fh "## Les points de l'Ordre du jour abordés";
 say $fh "\n";
-say $fh "**Nouvelles des membres triés par tirage aléatoire** (avec un *prng* innocent) : ";
+say $fh "### Nouvelles des membres triés par tirage aléatoire** (avec un *prng* innocent) : ";
 say $fh "";
 foreach (shuffle @membres)
 {
     say $fh "$_ \n\n";
 }
 say $fh "";
-say $fh "**Les pas (encore) membres :**";
+say $fh "#### Les pas (encore) membres : ";
 say $fh "";
 foreach (shuffle @nonmembres)
 {