Changeset 10014 in spip-zone
- Timestamp:
- Mar 1, 2007, 10:50:29 AM (14 years ago)
- Location:
- _plugins_/_test_/checklink
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
_plugins_/_test_/checklink/exec/table_liens.html
r10013 r10014 6 6 <p> 7 7 <div style='float:right'> 8 #SET{urlbase,#SELF|parametre_url{raz,''}|parametre_url{debut_liens,''}|parametre_url{update,''} }8 #SET{urlbase,#SELF|parametre_url{raz,''}|parametre_url{debut_liens,''}|parametre_url{update,''}|parametre_url{verifier,''}} 9 9 [(#ENV{statut,''}|?{' ',''})<a href='[(#GET{urlbase}|parametre_url{statut,''})]'>Tous les liens</a><br/>] 10 10 <BOUCLE_averif(LIENS){statut=ind}></BOUCLE_averif> … … 37 37 <td class="arial11">[(#LANG*)]</td> 38 38 <td class="arial11">[<a href='[(#URL_SITE_SPIP|suivre_lien{#URL})]' title="[(#TITRE|texte_backend)]"><:lien_visite_site:></a>]</td> 39 <td class="arial11">[<a href='[(# GET{urlbase}|parametre_url{verifier,#ID_LIEN})]' title="[(#TITRE|texte_backend)]"><:lien_mise_a_jour_syndication:></a>]</td>39 <td class="arial11">[<a href='[(#SELF|parametre_url{raz,''}|parametre_url{update,''}|parametre_url{verifier,#ID_LIEN})]' title="[(#TITRE|texte_backend)]"><:lien_mise_a_jour_syndication:></a>]</td> 40 40 </tr> 41 41 </BOUCLE_liens> -
_plugins_/_test_/checklink/inc/checklink_verification.php
r10013 r10014 6 6 $boundary=""; 7 7 $url_abs = url_absolue($url); 8 if (!preg_match(",^([\w]{3-6})://," ) AND $url_abs{0}!='/'){8 if (!preg_match(",^([\w]{3-6})://,",$url_abs) AND $url_abs{0}!='/'){ 9 9 $url_abs = suivre_lien(url_de_base(),$url_abs); 10 10 } … … 23 23 } 24 24 // presente 25 $texte = $statut; 26 // extraire le charset si present 27 $charset = false; 28 if (preg_match(",charset=\s*([^\s\"']*),i",$texte,$reg)) 29 $charset = trim($reg[1]); 30 if ($charset) 31 $texte = charset2unicode($texte,$charset); 32 else { 33 // a l'aveugle 34 $texte = charset2unicode($texte,'iso-8859-1'); 35 $texte = charset2unicode($texte,'utf-8'); 36 } 37 25 38 // extraire le titre et la langue 26 $texte = importer_charset($statut);27 39 $titre = null; 28 40 $lang = null;
Note: See TracChangeset
for help on using the changeset viewer.