[SPIP Zone] r3661 - /_plugins_/_typo_/barre_typo_enrichie/inc/texte.php

Author: real3t@gmail.com
Date: Mon Jun 26 01:30:54 2006
New Revision: 3661

Log:
Retour des bulles d'aide sur les liens et du hreflang (http://www.rexv.org/ est un vrai bonheur pour tester ce genre de regeexp !).

Le nombre de lignes du fork se réduit :wink:

Modified:
    _plugins_/_typo_/barre_typo_enrichie/inc/texte.php

Modified: _plugins_/_typo_/barre_typo_enrichie/inc/texte.php

--- _plugins_/_typo_/barre_typo_enrichie/inc/texte.php (original)
+++ _plugins_/_typo_/barre_typo_enrichie/inc/texte.php Mon Jun 26 01:30:54 2006
@@ -530,15 +530,6 @@

// obsolete, utiliser calculer_url

-/*function extraire_lien ($regs) {
- $lien_texte = $regs[1];
-
- if (ereg('^([^|]*|[^{]*)\{([a-z-]+)}$', $lien_texte, $match)) {
- $lien_texte = $match[1];
- $lien_hreflang = ' hreflang="'.$match[2].'"';
- }
-*/
-
function extraire_lien ($regs) {
   list($lien, $class, $texte) = calculer_url($regs[3], $regs[1],'tout');
   // Preparer le texte du lien ; attention s'il contient un <div>
@@ -1074,13 +1065,19 @@
   // Raccourcis liens [xxx->url]
   // Note : complique car c'est ici qu'on applique typo() !
   //
- $regexp = "|\[([^][]*)->(>?)([^]]*)\]|ms";
+ #$regexp = "|\[([^][]*)->(>?)([^]]*)\]|ms";
+ $regexp = "|\[([^][]*)(\|([^]{]*)(\{([a-z-]+)})?)?->(>)?([^]]*)\]|msU";
   $inserts = array();
   if (preg_match_all($regexp, $letexte, $matches, PREG_SET_ORDER)) {
     $i = 0;
     foreach ($matches as $regs) {
- list($lien, $class, $texte) = calculer_url($regs[3], $regs[1], 'tout');
- $inserts[++$i] = "<a href=\"$lien\" class=\"$class\">"
+ $str_title = attribut_html($regs[3]);
+ if ($str_title) $str_title = " title=\"$str_title\"";
+ $str_hreflang = attribut_html($regs[5]);
+ if ($str_hreflang) $str_hreflang = " hreflang=\"$str_hreflang\"";
+ //$str_targetblank = $regs[6]; // Pourrait servir pour la compatibilité AGORA
+ list($lien, $class, $texte) = calculer_url($regs[7], $regs[1], 'tout');
+ $inserts[++$i] = "<a href=\"$lien\" class=\"$class\"$str_title$str_hreflang>"
         . typo(supprimer_numero($texte))
         . "</a>";

* real3t@gmail.com tapotait, le 26/06/2006 01:30:

Author: real3t@gmail.com
Date: Mon Jun 26 01:30:54 2006
New Revision: 3661

Log:
Retour des bulles d'aide sur les liens et du hreflang (http://www.rexv.org/ est un vrai bonheur pour tester ce genre de regeexp !).

Par contre, rub49&params1=1 est cassé.

ça va être dans function calculer_url ($lien, $texte='', $pour='url') ligne 548 et suivantes.

--
RealET — SPIP fort et vert !