source: spip-zone/_plugins_/facteur/inc/envoyer_mail.php @ 34622

Last change on this file since 34622 was 34622, checked in by rastapopoulos@…, 11 years ago

on met un "dist" sinon on ne peut pas surcharger que la fonction

File size: 1.4 KB
Line 
1<?php
2
3
4        include_spip('inc/facteur_classes');
5
6
7        function inc_envoyer_mail_dist($destinataire, $sujet, $corps, $from = "", $headers = "") {
8                $message_html   = '';
9                $message_texte  = '';
10                if (is_array($corps)) {
11                        $message_html   = $corps['html'];
12                        $message_texte  = nettoyer_caracteres_mail($corps['texte']);
13                        $pieces_jointes = $corps['pieces_jointes'];
14                } else {
15                        $message_texte  = nettoyer_caracteres_mail($corps);
16                }
17                $sujet = nettoyer_titre_email($sujet);
18                $notification = new Facteur($destinataire, $sujet, $message_html, $message_texte);
19                if (!empty($from))
20                        $notification->From = $from;
21                if (count($pieces_jointes)) {
22                        foreach ($pieces_jointes as $piece) {
23                                $notification->AddAttachment($piece['chemin'], $piece['nom'], $piece['encodage'], $piece['mime']);
24                        }
25                }
26                return $notification->Send();
27        }
28
29
30
31/** Conserver les fonctions de SPIP car il en utilise certaines ! **/
32
33// utilisee par inc/notifications.php
34// http://doc.spip.org/@nettoyer_titre_email
35function nettoyer_titre_email($titre) {
36        return str_replace("\n", ' ', supprimer_tags(extraire_multi($titre)));
37}
38
39// http://doc.spip.org/@nettoyer_caracteres_mail
40function nettoyer_caracteres_mail($t) {
41
42        $t = filtrer_entites($t);
43
44        if ($GLOBALS['meta']['charset'] <> 'utf-8') {
45                $t = str_replace(
46                        array("&#8217;","&#8220;","&#8221;"),
47                        array("'",      '"',      '"'),
48                $t);
49        }
50
51        $t = str_replace(
52                array("&mdash;", "&endash;"),
53                array("--","-" ),
54        $t);
55
56        return $t;
57}
58
59?>
Note: See TracBrowser for help on using the repository browser.