Update of /home/spip-cvs/spip/ecrire
In directory alan:/tmp/cvs-serv5929/ecrire
Modified Files:
lab_ortho.php
Log Message:
correction bug "ortograve espagniole) (Antoine)
Index: lab_ortho.php
RCS file: /home/spip-cvs/spip/ecrire/lab_ortho.php,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- lab_ortho.php 11 Sep 2004 23:17:06 -0000 1.4
+++ lab_ortho.php 13 Sep 2004 20:59:40 -0000 1.5
@@ -79,7 +79,7 @@
}
}
lire_metas();
- srand(time());
+ mt_srand(time());
}
// Sauvegarder les infos de langues pour le miroir
@@ -139,7 +139,7 @@
$liste = chercher_miroirs_ortho($lang);
if (!count($liste)) return false;
foreach ($liste as $url) {
- $miroirs[md5(rand().$url)] = $url;
+ $miroirs[md5(mt_rand().$url.rand())] = $url;
}
ksort($miroirs);
return $miroirs;
@@ -403,12 +403,8 @@
}
else {
// Ici bidouilles si PCRE en mode UTF-8 ne fonctionne pas correctement ...
- // Guillemets francais (plage iso-latin)
- $trans = array(chr(194).chr(171) => ' ', chr(194).chr(187) => ' ');
- $texte = strtr($texte, $trans);
- // Saloperies non-conformes
- $trans = array(chr(194).chr(133) => ' ', chr(194).chr(150) => ' ', chr(194).chr(151) => ' ');
- $texte = strtr($texte, $trans);
+ // Caracteres non-alphanumeriques de la plage latin-1 + saloperies non-conformes
+ $texte = preg_replace(',\xC2[\x80-\xBF],', ' ', $texte);
// Poncutation etendue (unicode)
$texte = preg_replace(",".plage_punct_unicode().",", ' ', $texte);
// Caracteres ASCII non-alphanumeriques
@@ -450,7 +446,7 @@
// POST de la requete et recuperation du resultat XML
$urls = choisir_miroirs_ortho($lang);
if (!$urls) return false;
- $ok = '';
+ unset($ok);
$erreur = false;
foreach ($urls as $url) {
$xml = post_ortho($url, $texte_envoi, $lang);
@@ -458,13 +454,14 @@
$xml = $r[1];
if (preg_match(',<erreur>.*<code>(.*)</code>.*</erreur>,s', $xml, $r))
$erreur = $r[1];
- if (preg_match(',<ok>(.*)</ok>,s', $xml, $r))
+ if (preg_match(',<ok>(.*)</ok>,s', $xml, $r)) {
$ok = $r[1];
- if ($ok) break;
+ break;
+ }
}
reset_miroir($url);
}
- if (!$ok) return $erreur;
+ if (!isset($ok)) return $erreur;
// Remplir le tableau des resultats (mots mal orthographies)
if ($trans_rev) {