From 20b1cb56ade9f62e025d0cb6156191c95bc78063 Mon Sep 17 00:00:00 2001
From: Fil <fil@rezo.net>
Date: Fri, 16 May 2008 07:03:54 +0000
Subject: [PATCH] {{{propre(<a href='http:..'>http://...</a>) }}} ne doit pas
 creer de lien a l'interieur du lien (repere par Fetard sur exec=synchro)

---
 ecrire/inc/texte.php | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ecrire/inc/texte.php b/ecrire/inc/texte.php
index 4988913510..5e2332bbc4 100644
--- a/ecrire/inc/texte.php
+++ b/ecrire/inc/texte.php
@@ -1234,7 +1234,7 @@ function autoliens_callback($r) {
 		'/^(?:[^\W_]((?:[^\W_]|-){0,61}[^\W_])?\.)+[a-zA-Z]{2,6}\b/S', $l)) {
 			$l = inserer_attribut(expanser_liens('[->http://'.$l.']'),
 				'rel', 'nofollow');
-			// si le texte ne contanait pas le 'http:' on le supprime aussi
+			// si le texte ne contenait pas le 'http:' on le supprime aussi
 			if (!$m)
 				$l = str_replace('>http://', '>', $l);
 			return $l;
@@ -1247,7 +1247,7 @@ function autoliens_callback($r) {
 // http://doc.spip.org/@traiter_raccourci_liens
 function traiter_raccourci_liens($texte) {
 	return preg_replace_callback(
-	',\[[^\[\]]*->.*?\]|<[^<>]*>|((http:|www\.)[^"\'\s\[\]]+),S',
+	',\[[^\[\]]*->.*?\]|<a\b.*?</a>|<[^<>]*>|((http:|www\.)[^"\'\s\[\]]+),Si',
 	'autoliens_callback', $texte);
 	return $texte;
 }
@@ -1432,7 +1432,7 @@ function traiter_les_notes($mes_notes) {
 // http://doc.spip.org/@propre
 function propre($t, $connect='') {
 
-	return !$t ? '' :
+	return !$t ? strval($t) :
 		echappe_retour_modeles(
 			traiter_raccourcis(
 				expanser_liens(echappe_html($t),$connect)));
-- 
GitLab