From 9516415d3f0021deea463c8b40a7f7a7f2389fd3 Mon Sep 17 00:00:00 2001
From: Fil <fil@rezo.net>
Date: Thu, 10 Jul 2003 09:29:57 +0000
Subject: [PATCH] pitite amelioration librairie mail
---
ecrire/inc_version.php3 | 3 +++
1 file changed, 3 insertions(+)
diff --git a/ecrire/inc_version.php3 b/ecrire/inc_version.php3
index 3d3e00c905..d2690b746e 100644
--- a/ecrire/inc_version.php3
+++ b/ecrire/inc_version.php3
@@ -740,6 +740,9 @@ function email_valide($adresse) {
$adresses = explode(',', $adresse);
if (is_array($adresses)) {
while (list(, $adresse) = each($adresses)) {
+ // nettoyer certains formats
+ // "Marie Toto <Marie@toto.com>"
+ $adresse = eregi_replace("^[^<>\"]*<([^<>\"]+)>$", "\\1", $adresse);
// RFC 822
if (!eregi('^[^()<>@,;:\\"/[:space:]]+(@([-_0-9a-z]+\.)*[-_0-9a-z]+)?$', trim($adresse)))
return false;
--
GitLab