petit bug dans les {'xx','y'}

inc-compilo-index.php3

@@ -288,31 +288,31 @@ function applique_filtres($p) {
 
 function filtres_arglist($args, $p, $sep) {
 	$arglist ='';
-	while (strlen($args)) {
+	while (strlen($args = trim($args))) {
 		if ($args[0] =='"')
-		  ereg(' *("[^"]*") *,?(.*)$', $args, $regs);
-		elseif ($args[0] =="'")
-		  ereg(" *('[^']*') *,?(.*)$", $args, $regs);
+			ereg ('^"([^"])*",?(.*)$', $args, $regs);
+		else if ($args[0] =="'")
+			ereg ("^'([^']*)',?(.*)$", $args, $regs);
 		else
-		  ereg(' *([^,]+) *,?(.*)$', $args, $regs);
-		$arg = $regs[1];
+			ereg('^([^,]+),?(.*)$', $args, $regs);
+		$arg = trim($regs[1]);
+		$args = $regs[2];
 
 		if ($arg !== '') {
 			if ($arg[0] =='$')
 				$arg = '$Pile[0][\'' . substr($arg,1) . "']";
-			elseif ($arg[0] =='<')
-			  $arg = calculer_texte($arg, $p->id_boucle, $p->boucles);
-			elseif (ereg("^" . NOM_DE_CHAMP ."(.*)$", $arg, $r2)) {
+			else if ($arg[0] =='<')
+				$arg = calculer_texte($arg, $p->id_boucle, $p->boucles);
+			else if (ereg("^" . NOM_DE_CHAMP ."(.*)$", $arg, $r2)) {
 				$p->nom_boucle = $r2[2];
 				$p->nom_champ = $r2[3];
 				# faudrait verifier !trim(r2[5])
 				$arg = calculer_champ($p);
-			} elseif (!is_numeric($arg))
-				$arg = "'" . addslashes($arg) . "'";
+			} else if (!is_numeric($arg))
+				$arg = "'" . texte_script($arg) . "'";
 
 			$arglist .= $sep . $arg;
 		}
-		$args=$regs[2];
 	}
 	return $arglist;
 }