spip / SPIP

ecrire/public/compiler.php

Spacing +111 added lines, -119 removed lines

@@ -121,7 +121,7 @@ 
 						: calculer_liste($val, $p->descr, $boucles, $id_boucle);
 					if ($var !== 1) {
 						$val = ($echap ? "\'$var\' => ' . argumenter_squelette(" : "'$var' => ")
-							. $val . ($echap ? ") . '" : ' ');
+							. $val.($echap ? ") . '" : ' ');
 					} else {
 						$val = $echap ? "'.$val.'" : $val;
 					}
@@ -142,7 +142,7 @@ 
 	if (!$lang) {
 		$lang = '$GLOBALS["spip_lang"]';
 	}
-	$l['lang'] = ($echap ? "\'lang\' => ' . argumenter_squelette(" : "'lang' => ") . $lang . ($echap ? ") . '" : ' ');
+	$l['lang'] = ($echap ? "\'lang\' => ' . argumenter_squelette(" : "'lang' => ").$lang.($echap ? ") . '" : ' ');
 
 	return $l;
 }
@@ -171,7 +171,7 @@ 
 	$_contexte = argumenter_inclure($p->param, false, $p, $boucles, $id_boucle, true, '', true);
 	if (is_string($p->texte)) {
 		$fichier = $p->texte;
-		$code = '"' . str_replace('"', '\"', $fichier) . '"';
+		$code = '"'.str_replace('"', '\"', $fichier).'"';
 	} else {
 		$code = calculer_liste($p->texte, $p->descr, $boucles, $id_boucle);
 		if ($code and preg_match("/^'([^']*)'/s", $code, $r)) {
@@ -220,7 +220,7 @@ 
 		return false;
 	} // j'aurais voulu toucher le fond ...
 
-	$contexte = 'array(' . $_contexte . ')';
+	$contexte = 'array('.$_contexte.')';
 
 	if ($env) {
 		$contexte = "array_merge('.var_export(\$Pile[0],1).',$contexte)";
@@ -235,16 +235,16 @@ 
 			$_options[] = $ajax;
 		}
 		$code = " ' . argumenter_squelette($code) . '";
-		$code = 'echo ' . sprintf(
+		$code = 'echo '.sprintf(
 			CODE_RECUPERER_FOND,
 			$code,
 			$contexte,
 			implode(',', $_options),
 			'_request("connect")'
-		) . ';';
+		).';';
 	}
 
-	return "\n'<'.'" . '?php ' . $code . "\n?'." . "'>'";
+	return "\n'<'.'".'?php '.$code."\n?'."."'>'";
 }
 
 
@@ -324,7 +324,7 @@ 
 					$id = $id_table;
 					$statut = preg_replace(',\W,', '', $s['champ']); // securite
 				}
-				$mstatut = $id . '.' . $statut;
+				$mstatut = $id.'.'.$statut;
 
 				$arg_ignore_previsu = ($ignore_previsu ? ',true' : '');
 				include_spip('public/quete');
@@ -332,11 +332,11 @@ 
 					isset($s['post_date']) and $s['post_date']
 					and $GLOBALS['meta']['post_dates'] == 'non'
 				) {
-					$date = $id . '.' . preg_replace(',\W,', '', $s['post_date']); // securite
+					$date = $id.'.'.preg_replace(',\W,', '', $s['post_date']); // securite
 					array_unshift(
 						$boucle->where,
 						$echapper ?
-							"\nquete_condition_postdates('$date'," . _q($boucle->sql_serveur) . "$arg_ignore_previsu)"
+							"\nquete_condition_postdates('$date',"._q($boucle->sql_serveur)."$arg_ignore_previsu)"
 							:
 							quete_condition_postdates($date, $boucle->sql_serveur, $ignore_previsu)
 					);
@@ -345,9 +345,9 @@ 
 					$boucle->where,
 					$echapper ?
 						"\nquete_condition_statut('$mstatut',"
-						. _q($s['previsu']) . ','
-						. _q($s['publie']) . ','
-						. _q($boucle->sql_serveur) . "$arg_ignore_previsu)"
+						. _q($s['previsu']).','
+						. _q($s['publie']).','
+						. _q($boucle->sql_serveur)."$arg_ignore_previsu)"
 						:
 						quete_condition_statut($mstatut, $s['previsu'], $s['publie'], $boucle->sql_serveur, $ignore_previsu)
 				);
@@ -381,14 +381,14 @@ 
 	if (_request('var_mode_affiche') != 'resultat') {
 		$trace = '';
 	} else {
-		$_trace = $boucles[$id_boucle]->descr['nom'] . $id_boucle;
+		$_trace = $boucles[$id_boucle]->descr['nom'].$id_boucle;
 		$_trace = "\$GLOBALS['debug_objets']['resultat']['$_trace']";
 		$trace = "
 		if (empty($_trace)) { 
 			$_trace = []; 
 		}
 		if (count($_trace) < 3) { 
-			$_trace" . '[] = $t0; 
+			$_trace".'[] = $t0; 
 		}';
 	}
 
@@ -422,7 +422,7 @@ 
 	return
 		// Numrows[$nom] peut ne pas être encore defini
 		"\n\t\$save_numrows = (isset(\$Numrows['$nom']) ? \$Numrows['$nom'] : array());"
-		. "\n\t\$t0 = " . $boucles[$id_boucle]->return . ';'
+		. "\n\t\$t0 = ".$boucles[$id_boucle]->return.';'
 		. "\n\t\$Numrows['$nom'] = (\$save_numrows);"
 		. $trace
 		. "\n\treturn \$t0;";
@@ -489,7 +489,7 @@ 
 	// faudrait expanser le foreach a la compil, car y en a souvent qu'un
 	// et puis faire un [] plutot qu'un "','."
 	if ($boucle->doublons) {
-		$corps .= "\n\t\t\tforeach(" . $boucle->doublons . ' as $k) $doublons[$k] .= "," . ' .
+		$corps .= "\n\t\t\tforeach(".$boucle->doublons.' as $k) $doublons[$k] .= "," . '.
 			index_pile($id_boucle, $primary, $boucles)
 			. "; // doublons\n";
 	}
@@ -517,13 +517,13 @@ 
 		$corps .=
 			"\n\t\tlang_select_public("
 			. index_pile($id_boucle, 'lang', $boucles)
-			. ", '" . $boucle->lang_select . "'"
+			. ", '".$boucle->lang_select."'"
 			. (in_array($type_boucle, [
 				'articles',
 				'rubriques',
 				'hierarchie',
 				'breves'
-			]) ? ', ' . index_pile($id_boucle, 'titre', $boucles) : '')
+			]) ? ', '.index_pile($id_boucle, 'titre', $boucles) : '')
 			. ');';
 	} else {
 		$init_lang = '';
@@ -545,20 +545,16 @@ 
 
 	// gestion optimale des separateurs et des boucles constantes
 	if (count($boucle->separateur)) {
-		$code_sep = ("'" . str_replace("'", "\'", join('', $boucle->separateur)) . "'");
+		$code_sep = ("'".str_replace("'", "\'", join('', $boucle->separateur))."'");
 	}
 
 	$corps .=
 		((!$boucle->separateur) ?
-			(($constant && !$corps && !$flag_cpt) ? $return :
-				(($return === "''") ? '' :
-					("\n\t\t" . '$t0 .= ' . $return . ';'))) :
-			("\n\t\t\$t1 " .
+			(($constant && !$corps && !$flag_cpt) ? $return : (($return === "''") ? '' : ("\n\t\t".'$t0 .= '.$return.';'))) : ("\n\t\t\$t1 ".
 				((strpos($return, '$t1.') === 0) ?
-					('.=' . substr($return, 4)) :
-					('= ' . $return)) .
-				";\n\t\t" .
-				'$t0 .= ((strlen($t1) && strlen($t0)) ? ' . $code_sep . " : '') . \$t1;"));
+					('.='.substr($return, 4)) : ('= '.$return)).
+				";\n\t\t".
+				'$t0 .= ((strlen($t1) && strlen($t0)) ? '.$code_sep." : '') . \$t1;"));
 
 	// Calculer les invalideurs si c'est une boucle non constante et si on
 	// souhaite invalider ces elements
@@ -640,7 +636,7 @@ 
 		$corps,
 		$fin_lang,
 		$trace,
-		'BOUCLE' . $id_boucle . ' @ ' . ($boucle->descr['sourcefile'])
+		'BOUCLE'.$id_boucle.' @ '.($boucle->descr['sourcefile'])
 	);
 
 #	var_dump($a);exit;
@@ -661,23 +657,23 @@ 
  **/
 function calculer_requete_sql($boucle) {
 	$init = [];
-	$init[] = calculer_dec('table', "'" . $boucle->id_table . "'");
-	$init[] = calculer_dec('id', "'" . $boucle->id_boucle . "'");
+	$init[] = calculer_dec('table', "'".$boucle->id_table."'");
+	$init[] = calculer_dec('id', "'".$boucle->id_boucle."'");
 	# En absence de champ c'est un decompte :
 	$init[] = calculer_dec('from', calculer_from($boucle));
 	$init[] = calculer_dec('type', calculer_from_type($boucle));
 	$init[] = calculer_dec(
 		'groupby',
-		'array(' . (($g = join("\",\n\t\t\"", $boucle->group)) ? '"' . $g . '"' : '') . ')'
+		'array('.(($g = join("\",\n\t\t\"", $boucle->group)) ? '"'.$g.'"' : '').')'
 	);
-	$init[] = calculer_dec('select', 'array("' . join("\",\n\t\t\"", $boucle->select) . '")');
-	$init[] = calculer_dec('orderby', 'array(' . calculer_order($boucle) . ')');
+	$init[] = calculer_dec('select', 'array("'.join("\",\n\t\t\"", $boucle->select).'")');
+	$init[] = calculer_dec('orderby', 'array('.calculer_order($boucle).')');
 	$init[] = calculer_dec('where', calculer_dump_array($boucle->where));
 	$init[] = calculer_dec('join', calculer_dump_join($boucle->join));
 	$init[] = calculer_dec(
 		'limit',
 		(strpos($boucle->limit, 'intval') === false ?
-			"'" . $boucle->limit . "'"
+			"'".$boucle->limit."'"
 			:
 		$boucle->limit)
 	);
@@ -687,17 +683,17 @@ 
 	// ou recalculée à chaque passage (vide)
 	foreach ($init as $i) {
 		if (reset($i)) {
-			$s .= "\n\t\t" . end($i);
+			$s .= "\n\t\t".end($i);
 		} # statique
 		else {
-			$d .= "\n\t" . end($i);
+			$d .= "\n\t".end($i);
 		} # dynamique
 	}
 
 	return ($boucle->hierarchie ? "\n\t$boucle->hierarchie" : '')
 	. $boucle->in
 	. $boucle->hash
-	. "\n\t" . 'if (!isset($command[\'table\'])) {'
+	. "\n\t".'if (!isset($command[\'table\'])) {'
 	. $s
 	. "\n\t}"
 	. $d;
@@ -780,7 +776,7 @@ 
  *    - index 1 : Code de l'affectation
  **/
 function calculer_dec($nom, $val) {
-	$static = 'if (!isset($command[\'' . $nom . '\'])) ';
+	$static = 'if (!isset($command[\''.$nom.'\'])) ';
 	// si une variable apparait dans le calcul de la clause
 	// il faut la re-evaluer a chaque passage
 	if (
@@ -797,7 +793,7 @@ 
 		$static = '';
 	}
 
-	return [$static, '$command[\'' . $nom . '\'] = ' . $val . ';'];
+	return [$static, '$command[\''.$nom.'\'] = '.$val.';'];
 }
 
 /**
@@ -822,17 +818,17 @@ 
 	}
 	$res = '';
 	if ($a and $a[0] == "'?'") {
-		return ('(' . calculer_dump_array($a[1]) .
-			' ? ' . calculer_dump_array($a[2]) .
-			' : ' . calculer_dump_array($a[3]) .
+		return ('('.calculer_dump_array($a[1]).
+			' ? '.calculer_dump_array($a[2]).
+			' : '.calculer_dump_array($a[3]).
 			')');
 	} else {
 		foreach ($a as $k => $v) {
-			$showk = (is_numeric($k) ? '' : sql_quote($k) . ' => ');
-			$res .= ', ' . $showk . calculer_dump_array($v);
+			$showk = (is_numeric($k) ? '' : sql_quote($k).' => ');
+			$res .= ', '.$showk.calculer_dump_array($v);
 		}
 
-		return "\n\t\t\tarray(" . substr($res, 2) . ')';
+		return "\n\t\t\tarray(".substr($res, 2).')';
 	}
 }
 
@@ -840,10 +836,10 @@ 
 function calculer_dump_join($a) {
 	$res = '';
 	foreach ($a as $k => $v) {
-		$res .= ", '$k' => array(" . implode(',', $v) . ')';
+		$res .= ", '$k' => array(".implode(',', $v).')';
 	}
 
-	return 'array(' . substr($res, 2) . ')';
+	return 'array('.substr($res, 2).')';
 }
 
 /**
@@ -860,7 +856,7 @@ 
 		$res .= ",'$k' => '$v'";
 	}
 
-	return 'array(' . substr($res, 1) . ')';
+	return 'array('.substr($res, 1).')';
 }
 
 /**
@@ -878,7 +874,7 @@ 
 		$res .= ",'$k' => '$v'";
 	}
 
-	return 'array(' . substr($res, 1) . ')';
+	return 'array('.substr($res, 1).')';
 }
 
 // https://code.spip.net/@calculer_order
@@ -949,19 +945,19 @@ 
 				) {
 					$res .= " .\n$tab$code";
 				} else {
-					$res = substr($res, 0, -1) . substr($code, 1);
+					$res = substr($res, 0, -1).substr($code, 1);
 				}
 			}
 
-			return '(' . substr($res, 2 + $descr['niv']) . ')';
+			return '('.substr($res, 2 + $descr['niv']).')';
 		}
 	} else {
-		$nom = $descr['nom'] . $id_boucle . ($descr['niv'] ? $descr['niv'] : '');
+		$nom = $descr['nom'].$id_boucle.($descr['niv'] ? $descr['niv'] : '');
 
-		return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(" . join(
+		return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(".join(
 			" ,\n$tab",
 			$codes
-		) . ')))';
+		).')))';
 	}
 }
 
@@ -989,7 +985,7 @@ 
 			// texte seul
 			case 'texte':
 				$code = sandbox_composer_texte($p->texte, $p);
-				$commentaire = strlen($p->texte) . ' signes';
+				$commentaire = strlen($p->texte).' signes';
 				$avant = '';
 				$apres = '';
 				$altern = "''";
@@ -998,14 +994,14 @@ 
 			case 'polyglotte':
 				$code = '';
 				foreach ($p->traductions as $k => $v) {
-					$code .= ",'" .
-						str_replace(['\\', "'"], ['\\\\', "\\'"], $k) .
-						"' => '" .
-						str_replace(['\\', "'"], ['\\\\', "\\'"], $v) .
+					$code .= ",'".
+						str_replace(['\\', "'"], ['\\\\', "\\'"], $k).
+						"' => '".
+						str_replace(['\\', "'"], ['\\\\', "\\'"], $v).
 						"'";
 				}
-				$code = 'choisir_traduction(array(' .
-					substr($code, 1) .
+				$code = 'choisir_traduction(array('.
+					substr($code, 1).
 					'))';
 				$commentaire = '&';
 				$avant = '';
@@ -1021,7 +1017,7 @@ 
 					$err_e_c = true;
 					$code = "''";
 				} else {
-					$commentaire = '<INCLURE ' . addslashes(str_replace("\n", ' ', $code)) . '>';
+					$commentaire = '<INCLURE '.addslashes(str_replace("\n", ' ', $code)).'>';
 					$avant = '';
 					$apres = '';
 					$altern = "''";
@@ -1050,8 +1046,8 @@ 
 					$err_e_c = true;
 					$code = "''";
 				} else {
-					$code = 'BOUCLE' .
-						str_replace('-', '_', $nom) . $descr['nom'] .
+					$code = 'BOUCLE'.
+						str_replace('-', '_', $nom).$descr['nom'].
 						'($Cache, $Pile, $doublons, $Numrows, $SP)';
 					$commentaire = "?$nom";
 					if (
@@ -1093,24 +1089,22 @@ 
 				foreach ($p->arg as $k => $v) {
 					$_v = calculer_liste($v, $descr, $boucles, $id_boucle);
 					if ($k) {
-						$l[] = _q($k) . ' => ' . $_v;
+						$l[] = _q($k).' => '.$_v;
 					} else {
 						$code = $_v;
 					}
 				}
 				// Si le module n'est pas fourni, l'expliciter sauf si calculé
 				if ($p->module) {
-					$m = $p->module . ':' . $p->nom_champ;
+					$m = $p->module.':'.$p->nom_champ;
 				} elseif ($p->nom_champ) {
-					$m = MODULES_IDIOMES . ':' . $p->nom_champ;
+					$m = MODULES_IDIOMES.':'.$p->nom_champ;
 				} else {
 					$m = '';
 				}
 
-				$code = (!$code ? "'$m'" :
-						($m ? "'$m' . $code" :
-							("(strpos(\$x=$code, ':') ? \$x : ('" . MODULES_IDIOMES . ":' . \$x))")))
-					. (!$l ? '' : (', array(' . implode(",\n", $l) . ')'));
+				$code = (!$code ? "'$m'" : ($m ? "'$m' . $code" : ("(strpos(\$x=$code, ':') ? \$x : ('".MODULES_IDIOMES.":' . \$x))")))
+					. (!$l ? '' : (', array('.implode(",\n", $l).')'));
 				$code = "_T($code)";
 				if ($p->param) {
 					$p->id_boucle = $id_boucle;
@@ -1132,7 +1126,7 @@ 
 				$p->type_requete = $type;
 
 				$code = calculer_champ($p);
-				$commentaire = '#' . $p->nom_champ . $p->etoile;
+				$commentaire = '#'.$p->nom_champ.$p->etoile;
 				$avant = calculer_liste(
 					$p->avant,
 					$descr,
@@ -1172,10 +1166,9 @@ 
 		if ($code != "''") {
 			$code = compile_retour($code, $avant, $apres, $altern, $tab, $descr['niv']);
 			$codes[] = (($mode == 'validation') ?
-				"array($code, '$commentaire', " . $p->ligne . ')'
+				"array($code, '$commentaire', ".$p->ligne.')'
 				: (($mode == 'code') ?
-					"\n// $commentaire\n$code" :
-					$code));
+					"\n// $commentaire\n$code" : $code));
 		}
 	} // foreach
 
@@ -1232,19 +1225,19 @@ 
 			$cond = '';
 		} elseif (preg_match(_REGEXP_COND_VIDE_NONVIDE, $code, $r)) {
 			$t = $r[2];
-			$cond = '!' . $r[1];
+			$cond = '!'.$r[1];
 		} else {
 			if (preg_match(_REGEXP_COND_NONVIDE_VIDE, $code, $r)) {
 				$t = $r[2];
 				$cond = $r[1];
 			} else {
-				$t = '$t' . $n;
+				$t = '$t'.$n;
 				$cond = "($t = $code)!==''";
 			}
 		}
 
-		$res = (!$avant ? '' : "$avant . ") .
-			$t .
+		$res = (!$avant ? '' : "$avant . ").
+			$t.
 			(!$apres ? '' : " . $apres");
 
 		if ($res !== $t) {
@@ -1296,13 +1289,13 @@ 
 
 	// rendre inertes les echappements de #[](){}<>
 	$i = 0;
-	while (false !== strpos($squelette, $inerte = '-INERTE' . $i)) {
+	while (false !== strpos($squelette, $inerte = '-INERTE'.$i)) {
 		$i++;
 	}
 	$squelette = preg_replace_callback(
 		',\\\\([#[()\]{}<>]),',
-		function ($a) use ($inerte) {
-			return "$inerte-" . ord($a[1]) . '-';
+		function($a) use ($inerte) {
+			return "$inerte-".ord($a[1]).'-';
 		},
 		$squelette,
 		-1,
@@ -1319,7 +1312,7 @@ 
 	// Phraser le squelette, selon sa grammaire
 
 	$boucles = [];
-	$f = charger_fonction('phraser_' . $gram, 'public');
+	$f = charger_fonction('phraser_'.$gram, 'public');
 
 	$squelette = $f($squelette, '', $boucles, $descr);
 
@@ -1330,15 +1323,15 @@ 
 		foreach ($boucles as $i => $boucle) {
 			$boucles[$i]->return = preg_replace_callback(
 				",$inerte-(\d+)-,",
-				function ($a) {
+				function($a) {
 					return chr($a[1]);
 				},
 				$boucle->return
 			);
 			$boucles[$i]->descr['squelette'] = preg_replace_callback(
 				",$inerte-(\d+)-,",
-				function ($a) {
-					return '\\\\' . chr($a[1]);
+				function($a) {
+					return '\\\\'.chr($a[1]);
 				},
 				$boucle->descr['squelette']
 			);
@@ -1350,19 +1343,19 @@ 
 		include_spip('public/decompiler');
 		foreach ($boucles as $id => $boucle) {
 			if ($id) {
-				$decomp = "\n/* BOUCLE " .
-					$boucle->type_requete .
-					' ' .
-					str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')) .
-					($boucle->debug ? "\n *\n * " . implode("\n * ", $boucle->debug) . "\n" : '') .
+				$decomp = "\n/* BOUCLE ".
+					$boucle->type_requete.
+					' '.
+					str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')).
+					($boucle->debug ? "\n *\n * ".implode("\n * ", $boucle->debug)."\n" : '').
 					" */\n";
 			} else {
-				$decomp = ("\n/*\n" .
+				$decomp = ("\n/*\n".
 					str_replace('*/', '* /', public_decompiler($squelette, $gram))
 					. "\n*/");
 			}
-			$boucles[$id]->return = $decomp . $boucle->return;
-			$GLOBALS['debug_objets']['code'][$nom . $id] = $boucle->return;
+			$boucles[$id]->return = $decomp.$boucle->return;
+			$GLOBALS['debug_objets']['code'][$nom.$id] = $boucle->return;
 		}
 	}
 
@@ -1385,7 +1378,7 @@ 
 		}
 	}
 	foreach ($boucles as $id => $boucle) {
-		$GLOBALS['debug_objets']['boucle'][$nom . $id] = $boucle;
+		$GLOBALS['debug_objets']['boucle'][$nom.$id] = $boucle;
 	}
 	$descr['documents'] = compile_inclure_doublons($squelette);
 
@@ -1476,8 +1469,7 @@ 
 						} else {
 							$boucles[$id]->type_requete = false;
 							$boucle = $boucles[$id];
-							$x = (!$boucle->sql_serveur ? '' :
-									($boucle->sql_serveur . ':')) .
+							$x = (!$boucle->sql_serveur ? '' : ($boucle->sql_serveur.':')).
 								$type;
 							$msg = [
 								'zbug_table_inconnue',
@@ -1567,13 +1559,13 @@ 
 			if (
 				// fonction de boucle avec serveur & table
 				(!$serveur or
-					((!function_exists($f = 'boucle_' . $serveur . '_' . $table))
-						and (!function_exists($f = $f . '_dist'))
+					((!function_exists($f = 'boucle_'.$serveur.'_'.$table))
+						and (!function_exists($f = $f.'_dist'))
 					)
 				)
 				// fonction de boucle avec table
-				and (!function_exists($f = 'boucle_' . $table))
-				and (!function_exists($f = $f . '_dist'))
+				and (!function_exists($f = 'boucle_'.$table))
+				and (!function_exists($f = $f.'_dist'))
 			) {
 				// fonction de boucle standard
 				if (!function_exists($f = 'boucle_DEFAUT')) {
@@ -1581,20 +1573,20 @@ 
 				}
 			}
 
-			$req = "\n\n\tstatic \$command = array();\n\t" .
-				"static \$connect;\n\t" .
-				"\$command['connect'] = \$connect = " .
-				_q($boucle->sql_serveur) .
-				';' .
+			$req = "\n\n\tstatic \$command = array();\n\t".
+				"static \$connect;\n\t".
+				"\$command['connect'] = \$connect = ".
+				_q($boucle->sql_serveur).
+				';'.
 				$f($id, $boucles);
 		} else {
 			$req = ("\n\treturn '';");
 		}
 
 		$boucles[$id]->return =
-			"\n\nfunction BOUCLE" . strtr($id, '-', '_') . $nom .
-			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {' .
-			$req .
+			"\n\nfunction BOUCLE".strtr($id, '-', '_').$nom.
+			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {'.
+			$req.
 			"\n}\n";
 	}
 
@@ -1604,7 +1596,7 @@ 
 		return false;
 	}
 
-	$principal = "\nfunction " . $nom . '($Cache, $Pile, $doublons = array(), $Numrows = array(), $SP = 0) {
+	$principal = "\nfunction ".$nom.'($Cache, $Pile, $doublons = array(), $Numrows = array(), $SP = 0) {
 '
 		// reporter de maniere securisee les doublons inclus
 		. '
@@ -1612,15 +1604,15 @@ 
 		$doublons = nettoyer_env_doublons($Pile[0]["doublons"]);
 
 	$connect = ' .
-		_q($connect) . ';
+		_q($connect).';
 	$page = ' .
 		// ATTENTION, le calcul de l'expression $corps affectera $Cache
 		// c'est pourquoi on l'affecte a la variable auxiliaire $page.
 		// avant de referencer $Cache
-		$corps . ';
+		$corps.';
 
 	return analyse_resultat_skel(' . var_export($nom, true)
-		. ', $Cache, $page, ' . var_export($sourcefile, true) . ');
+		. ', $Cache, $page, '.var_export($sourcefile, true).');
 }';
 
 	$secondes = spip_timer('calcul_skel');
@@ -1634,10 +1626,10 @@ 
 	$code->return = '
 //
 // Fonction principale du squelette ' .
-		$sourcefile .
-		($connect ? " pour $connect" : '') .
-		(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes") .
-		"\n//\n" .
+		$sourcefile.
+		($connect ? " pour $connect" : '').
+		(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes").
+		"\n//\n".
 		$principal;
 
 	$boucles[''] = $code;
@@ -1689,7 +1681,7 @@ 
  **/
 function requeteur_data_dist(&$boucles, &$boucle, &$id) {
 	include_spip('iterateur/data');
-	if ($h = charger_fonction($boucle->type_requete . '_to_array', 'inc', true)) {
+	if ($h = charger_fonction($boucle->type_requete.'_to_array', 'inc', true)) {
 		$g = charger_fonction('data', 'iterateur');
 		$boucles[$id] = $g($boucle);
 		// from[0] stocke le type de data (rss, yql, ...)

ecrire/public/phraser_html.php

Spacing +28 added lines, -28 removed lines

@@ -48,19 +48,19 @@ 
  * Nom d'une balise #TOTO
  *
  * Écriture alambiquée pour rester compatible avec les hexadecimaux des vieux squelettes */
-define('NOM_DE_CHAMP', '#((' . NOM_DE_BOUCLE . "):)?(([A-F]*[G-Z_][A-Z_0-9]*)|[A-Z_]+)\b(\*{0,2})");
+define('NOM_DE_CHAMP', '#(('.NOM_DE_BOUCLE."):)?(([A-F]*[G-Z_][A-Z_0-9]*)|[A-Z_]+)\b(\*{0,2})");
 /** Balise complète [...(#TOTO) ... ] */
-define('CHAMP_ETENDU', '/\[([^]\[]*)\(' . NOM_DE_CHAMP . '([^[)]*\)[^]\[]*)\]/S');
+define('CHAMP_ETENDU', '/\[([^]\[]*)\('.NOM_DE_CHAMP.'([^[)]*\)[^]\[]*)\]/S');
 
 define('BALISE_INCLURE', '/<INCLU[DR]E[[:space:]]*(\(([^)]*)\))?/S');
 define('BALISE_POLYGLOTTE', ',<multi>(.*)</multi>,Uims');
 define('BALISE_IDIOMES', ',<:(([a-z0-9_]+):)?([a-z0-9_]*)({([^\|=>]*=[^\|>]*)})?((\|[^>]*)?:/?>),iS');
-define('BALISE_IDIOMES_ARGS', '@^\s*([^= ]*)\s*=\s*((' . NOM_DE_CHAMP . '[{][^}]*})?[^,]*)\s*,?\s*@s');
+define('BALISE_IDIOMES_ARGS', '@^\s*([^= ]*)\s*=\s*(('.NOM_DE_CHAMP.'[{][^}]*})?[^,]*)\s*,?\s*@s');
 
 /** Champ sql dans parenthèse ex: (id_article) */
 define('SQL_ARGS', '(\([^)]*\))');
 /** Fonction SQL sur un champ ex: SUM(visites) */
-define('CHAMP_SQL_PLUS_FONC', '`?([A-Z_\/][A-Z_\/0-9.]*)' . SQL_ARGS . '?`?');
+define('CHAMP_SQL_PLUS_FONC', '`?([A-Z_\/][A-Z_\/0-9.]*)'.SQL_ARGS.'?`?');
 
 // https://code.spip.net/@phraser_inclure
 function phraser_inclure($texte, $ligne, $result) {
@@ -217,7 +217,7 @@ 
  * @return array
  **/
 function phraser_champs($texte, $ligne, $result) {
-	while (preg_match('/' . NOM_DE_CHAMP . '/S', $texte, $match)) {
+	while (preg_match('/'.NOM_DE_CHAMP.'/S', $texte, $match)) {
 		$p = strpos($texte, $match[0]);
 		// texte après la balise
 		$suite = substr($texte, $p + strlen($match[0]));
@@ -369,7 +369,7 @@ 
 			$collecte[] = $champ;
 			$args = ltrim($regs[count($regs) - 1]);
 		} else {
-			if (!preg_match('/' . NOM_DE_CHAMP . '([{|])/', $arg, $r)) {
+			if (!preg_match('/'.NOM_DE_CHAMP.'([{|])/', $arg, $r)) {
 				// 0 est un aveu d'impuissance. A completer
 				$arg = phraser_champs_exterieurs($arg, 0, $sep, $result);
 
@@ -454,7 +454,7 @@ 
 function phraser_champs_exterieurs($texte, $ligne, $sep, $nested) {
 	$res = [];
 	while (($p = strpos($texte, "%$sep")) !== false) {
-		if (!preg_match(',^%' . preg_quote($sep) . '([0-9]+)@,', substr($texte, $p), $m)) {
+		if (!preg_match(',^%'.preg_quote($sep).'([0-9]+)@,', substr($texte, $p), $m)) {
 			break;
 		}
 		$debut = substr($texte, 0, $p);
@@ -495,7 +495,7 @@ 
 			$pos_apres = 0;
 			$result = phraser_args($match[7], ')', $sep, $result, $champ, $pos_apres);
 			phraser_vieux($champ);
-			$champ->avant =	phraser_champs_exterieurs($match[1], $n, $sep, $result);
+			$champ->avant = phraser_champs_exterieurs($match[1], $n, $sep, $result);
 			$debut = substr($match[7], $pos_apres + 1);
 			if (!empty($debut)) {
 				$n += substr_count(substr($texte, 0, strpos($texte, $debut)), "\n");
@@ -626,7 +626,7 @@ 
 					// une maniere tres sale de supprimer les "' autour de {critere "xxx","yyy"}
 					if (preg_match(',^(["\'])(.*)\1$,', $m[4])) {
 						$c = null;
-						eval('$c = ' . $m[4] . ';');
+						eval('$c = '.$m[4].';');
 						if (isset($c)) {
 							$m[4] = $c;
 						}
@@ -706,7 +706,7 @@ 
 					if (preg_match(',^ *([0-9-]+) *(/) *(.+) *$,', $param, $m)) {
 						$crit = phraser_critere_infixe($m[1], $m[3], $v, '/', '', '');
 					} elseif (
-						preg_match(',^([!]?)(' . CHAMP_SQL_PLUS_FONC .
+						preg_match(',^([!]?)('.CHAMP_SQL_PLUS_FONC.
 						')[[:space:]]*(\??)(!?)(<=?|>=?|==?|\b(?:IN|LIKE)\b)(.*)$,is', $param, $m)
 					) {
 						$a2 = trim($m[8]);
@@ -723,8 +723,8 @@ 
 						);
 						$crit->exclus = $m[1];
 					} elseif (
-						preg_match('/^([!]?)\s*(' .
-						CHAMP_SQL_PLUS_FONC .
+						preg_match('/^([!]?)\s*('.
+						CHAMP_SQL_PLUS_FONC.
 						')\s*(\??)(.*)$/is', $param, $m)
 					) {
 						// contient aussi les comparaisons implicites !
@@ -870,7 +870,7 @@ 
 			}
 
 			// trouver sa position de depart reelle : au <Bxx> ou au <BBxx>
-			$precond_boucle = BALISE_PRECOND_BOUCLE . $id_boucle . '>';
+			$precond_boucle = BALISE_PRECOND_BOUCLE.$id_boucle.'>';
 			$pos_precond = strpos($texte, $precond_boucle, $id_boucle ? $pos_debut_texte : $pos_derniere_boucle_anonyme);
 			if (
 				$pos_precond !== false
@@ -881,7 +881,7 @@ 
 				$boucle['pos_precond_inside'] = $pos_precond + strlen($precond_boucle);
 			}
 
-			$preaff_boucle = BALISE_PREAFF_BOUCLE . $id_boucle . '>';
+			$preaff_boucle = BALISE_PREAFF_BOUCLE.$id_boucle.'>';
 			$pos_preaff = strpos($texte, $preaff_boucle, $id_boucle ? $pos_debut_texte : $pos_derniere_boucle_anonyme);
 			if (
 				$pos_preaff !== false
@@ -929,13 +929,13 @@ 
 	$pos_anonyme_next = null;
 	// si c'est une boucle anonyme, chercher la position de la prochaine boucle anonyme
 	if (!strlen($id_boucle)) {
-		$pos_anonyme_next = strpos($texte, BALISE_BOUCLE . '(', $pos_courante);
+		$pos_anonyme_next = strpos($texte, BALISE_BOUCLE.'(', $pos_courante);
 	}
 
 	//
 	// 1. Recuperer la partie conditionnelle apres
 	//
-	$apres_boucle = BALISE_POSTCOND_BOUCLE . $id_boucle . '>';
+	$apres_boucle = BALISE_POSTCOND_BOUCLE.$id_boucle.'>';
 	$pos_apres = strpos($texte, $apres_boucle, $pos_courante);
 	if (
 		$pos_apres !== false
@@ -944,13 +944,13 @@ 
 		$boucle['pos_postcond'] = $pos_apres;
 		$pos_apres += strlen($apres_boucle);
 		$boucle['pos_postcond_inside'] = $pos_apres;
-		$pos_courante = $pos_apres ;
+		$pos_courante = $pos_apres;
 	}
 
 	//
 	// 2. Récuperer la partie alternative apres
 	//
-	$altern_boucle = BALISE_ALT_BOUCLE . $id_boucle . '>';
+	$altern_boucle = BALISE_ALT_BOUCLE.$id_boucle.'>';
 	$pos_altern = strpos($texte, $altern_boucle, $pos_courante);
 	if (
 		$pos_altern !== false
@@ -965,7 +965,7 @@ 
 	//
 	// 3. Recuperer la partie footer non alternative
 	//
-	$postaff_boucle = BALISE_POSTAFF_BOUCLE . $id_boucle . '>';
+	$postaff_boucle = BALISE_POSTAFF_BOUCLE.$id_boucle.'>';
 	$pos_postaff = strpos($texte, $postaff_boucle, $pos_courante);
 	if (
 		$pos_postaff !== false
@@ -974,7 +974,7 @@ 
 		$boucle['pos_postaff'] = $pos_postaff;
 		$pos_postaff += strlen($postaff_boucle);
 		$boucle['pos_postaff_inside'] = $pos_postaff;
-		$pos_courante = $pos_postaff ;
+		$pos_courante = $pos_postaff;
 	}
 
 	return $boucle;
@@ -1014,7 +1014,7 @@ 
  * @return string
  */
 function public_generer_boucle_placeholder($id_boucle, &$boucle, $boucle_placeholder, $nb_lignes) {
-	$placeholder = "[(#{$boucle_placeholder}{" . $id_boucle . '})' . str_pad('', $nb_lignes, "\n") . ']';
+	$placeholder = "[(#{$boucle_placeholder}{".$id_boucle.'})'.str_pad('', $nb_lignes, "\n").']';
 	//memoriser la boucle a reinjecter
 	$id_boucle = "$id_boucle";
 	phraser_boucle_placeholder($id_boucle, $boucle_placeholder, $boucle);
@@ -1027,7 +1027,7 @@ 
 	// definir un placholder pour les boucles dont on est sur d'avoir aucune occurence dans le squelette
 	if (is_null($boucle_placeholder)) {
 		do {
-			$boucle_placeholder = 'BOUCLE_PLACEHOLDER_' . strtoupper(md5(uniqid()));
+			$boucle_placeholder = 'BOUCLE_PLACEHOLDER_'.strtoupper(md5(uniqid()));
 		} while (strpos($texte, $boucle_placeholder) !== false);
 	}
 
@@ -1047,7 +1047,7 @@ 
 
 		// boucle anonyme ?
 		if (!strlen($id_boucle)) {
-			$id_boucle = '_anon_L' . $ligne_milieu . '_' . substr(md5('anonyme:' . $id_parent . ':' . json_encode($boucle)), 0, 8);
+			$id_boucle = '_anon_L'.$ligne_milieu.'_'.substr(md5('anonyme:'.$id_parent.':'.json_encode($boucle)), 0, 8);
 		}
 
 		$pos_debut_boucle = $pos_courante;
@@ -1060,7 +1060,7 @@ 
 
 			$pos_avant = $boucle['pos_precond_inside'];
 			$result->avant = substr($texte, $pos_avant, $pos_courante - $pos_avant);
-			$ligne_avant = $ligne_debut_texte +  public_compte_ligne($texte, $pos_debut_texte, $pos_avant);
+			$ligne_avant = $ligne_debut_texte + public_compte_ligne($texte, $pos_debut_texte, $pos_avant);
 		}
 
 		// Regarder si on a une partie inconditionnelle avant <BB_xxx>
@@ -1069,7 +1069,7 @@ 
 
 			$pos_preaff = $boucle['pos_preaff_inside'];
 			$result->preaff = substr($texte, $pos_preaff, $end_preaff - $pos_preaff);
-			$ligne_preaff = $ligne_debut_texte +  public_compte_ligne($texte, $pos_debut_texte, $pos_preaff);
+			$ligne_preaff = $ligne_debut_texte + public_compte_ligne($texte, $pos_debut_texte, $pos_preaff);
 		}
 
 		$result->id_boucle = $id_boucle;
@@ -1126,7 +1126,7 @@ 
 		} else {
 			$pos_milieu += 1;
 
-			$fin_boucle = BALISE_FIN_BOUCLE . $id_boucle_search . '>';
+			$fin_boucle = BALISE_FIN_BOUCLE.$id_boucle_search.'>';
 			$pos_fin = strpos($texte, $fin_boucle, $pos_milieu);
 			if ($pos_fin === false) {
 				$err_b = [
@@ -1139,7 +1139,7 @@ 
 			else {
 				// verifier une eventuelle imbrication d'une boucle homonyme
 				// (interdite, generera une erreur plus loin, mais permet de signaler la bonne erreur)
-				$search_debut_boucle = BALISE_BOUCLE . $id_boucle_search . '(';
+				$search_debut_boucle = BALISE_BOUCLE.$id_boucle_search.'(';
 				$search_from = $pos_milieu;
 				$nb_open = 1;
 				$nb_close = 1;
@@ -1179,7 +1179,7 @@ 
 		if ($boucle['pos_postcond']) {
 			$result->apres = substr($texte, $pos_courante, $boucle['pos_postcond'] - $pos_courante);
 			$ligne_suite += public_compte_ligne($texte, $pos_courante, $boucle['pos_postcond_inside']);
-			$pos_courante = $boucle['pos_postcond_inside'] ;
+			$pos_courante = $boucle['pos_postcond_inside'];
 		}
 
 

ecrire/public/criteres.php

Spacing +172 added lines, -180 removed lines

@@ -46,10 +46,9 @@ 
 	$not = $crit->not;
 	$boucle = &$boucles[$idb];
 	$id_parent = isset($GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent']) ?
-		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] :
-		'id_parent';
+		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] : 'id_parent';
 
-	$c = ["'='", "'$boucle->id_table." . "$id_parent'", 0];
+	$c = ["'='", "'$boucle->id_table."."$id_parent'", 0];
 	$boucle->where[] = ($crit->not ? ["'NOT'", $c] : $c);
 }
 
@@ -72,10 +71,10 @@ 
 	$id = $boucle->primary;
 
 	if ($not or !$id) {
-		return (['zbug_critere_inconnu', ['critere' => $not . $crit->op]]);
+		return (['zbug_critere_inconnu', ['critere' => $not.$crit->op]]);
 	}
 	$arg = kwote(calculer_argument_precedent($idb, $id, $boucles));
-	$boucle->where[] = ["'!='", "'$boucle->id_table." . "$id'", $arg];
+	$boucle->where[] = ["'!='", "'$boucle->id_table."."$id'", $arg];
 }
 
 
@@ -106,12 +105,12 @@ 
 	$not = ($crit->not ? '' : 'NOT');
 
 	// le doublon s'applique sur un type de boucle (article)
-	$nom = "'" . $boucle->type_requete . "'";
+	$nom = "'".$boucle->type_requete."'";
 
 	// compléter le nom avec un nom précisé {doublons nom}
 	// on obtient $nom = "'article' . 'nom'"
 	if (isset($crit->param[0])) {
-		$nom .= '.' . calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent);
+		$nom .= '.'.calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent);
 	}
 
 	// code qui déclarera l'index du stockage de nos doublons (pour éviter une notice PHP)
@@ -123,13 +122,13 @@ 
 	// $doublons et son index, ici $nom
 
 	// debut du code "sql_in('articles.id_article', "
-	$debut_in = "sql_in('" . $boucle->id_table . '.' . $primary . "', ";
+	$debut_in = "sql_in('".$boucle->id_table.'.'.$primary."', ";
 	// lecture des données du doublon "$doublons[$doublon_index[] = "
 	// Attention : boucle->doublons désigne une variable qu'on affecte
-	$debut_doub = '$doublons[' . (!$not ? '' : ($boucle->doublons . '[]= '));
+	$debut_doub = '$doublons['.(!$not ? '' : ($boucle->doublons.'[]= '));
 
 	// le debut complet du code des doublons
-	$debut_doub = $debut_in . $debut_doub;
+	$debut_doub = $debut_in.$debut_doub;
 
 	// nom du doublon "('article' . 'nom')]"
 	$fin_doub = "($nom)]";
@@ -139,22 +138,22 @@ 
 	foreach ($boucle->where as $k => $w) {
 		if (strpos($w[0], $debut_doub) === 0) {
 			// fusionner le sql_in (du where)
-			$boucle->where[$k][0] = $debut_doub . $fin_doub . ' . ' . substr($w[0], strlen($debut_in));
+			$boucle->where[$k][0] = $debut_doub.$fin_doub.' . '.substr($w[0], strlen($debut_in));
 			// fusionner l'initialisation (du hash) pour faire plus joli
 			$x = strpos($boucle->hash, $init_comment);
 			$len = strlen($init_comment);
 			$boucle->hash =
-				substr($boucle->hash, 0, $x + $len) . $init_code . substr($boucle->hash, $x + $len);
+				substr($boucle->hash, 0, $x + $len).$init_code.substr($boucle->hash, $x + $len);
 
 			return;
 		}
 	}
 
 	// mettre l'ensemble dans un tableau pour que ce ne soit pas vu comme une constante
-	$boucle->where[] = [$debut_doub . $fin_doub . ", '" . $not . "')"];
+	$boucle->where[] = [$debut_doub.$fin_doub.", '".$not."')"];
 
 	// déclarer le doublon s'il n'existe pas encore
-	$boucle->hash .= $init_comment . $init_code;
+	$boucle->hash .= $init_comment.$init_code;
 
 
 	# la ligne suivante avait l'intention d'eviter une collecte deja faite
@@ -215,10 +214,10 @@ 
 	$un = $un[0]->texte;
 	$deux = $deux[0]->texte;
 	if ($deux) {
-		$boucles[$idb]->limit = 'intval($Pile[0]["debut' .
-			$un .
-			'"]) . ",' .
-			$deux .
+		$boucles[$idb]->limit = 'intval($Pile[0]["debut'.
+			$un.
+			'"]) . ",'.
+			$deux.
 			'"';
 	} else {
 		calculer_critere_DEFAUT_dist($idb, $boucles, $crit);
@@ -281,26 +280,26 @@ 
 		$type = calculer_liste([$crit->param[1][0]], $idb, $boucles, $boucle->id_parent);
 	}
 
-	$debut = ($type[0] !== "'") ? "'debut'.$type" : ("'debut" . substr($type, 1));
+	$debut = ($type[0] !== "'") ? "'debut'.$type" : ("'debut".substr($type, 1));
 	$boucle->modificateur['debut_nom'] = $type;
 	$partie =
 		// tester si le numero de page demande est de la forme '@yyy'
-		'isset($Pile[0][' . $debut . ']) ? $Pile[0][' . $debut . '] : _request(' . $debut . ");\n"
+		'isset($Pile[0]['.$debut.']) ? $Pile[0]['.$debut.'] : _request('.$debut.");\n"
 		. "\tif(substr(\$debut_boucle,0,1)=='@'){\n"
-		. "\t\t" . '$debut_boucle = $Pile[0][' . $debut . '] = quete_debut_pagination(\'' . $boucle->primary . '\',$Pile[0][\'@' . $boucle->primary . '\'] = substr($debut_boucle,1),' . $pas . ',$iter);' . "\n"
-		. "\t\t" . '$iter->seek(0);' . "\n"
+		. "\t\t".'$debut_boucle = $Pile[0]['.$debut.'] = quete_debut_pagination(\''.$boucle->primary.'\',$Pile[0][\'@'.$boucle->primary.'\'] = substr($debut_boucle,1),'.$pas.',$iter);'."\n"
+		. "\t\t".'$iter->seek(0);'."\n"
 		. "\t}\n"
-		. "\t" . '$debut_boucle = intval($debut_boucle)';
+		. "\t".'$debut_boucle = intval($debut_boucle)';
 
 	$boucle->hash .= '
-	$command[\'pagination\'] = array((isset($Pile[0][' . $debut . ']) ? $Pile[0][' . $debut . '] : null), ' . $pas . ');';
+	$command[\'pagination\'] = array((isset($Pile[0][' . $debut.']) ? $Pile[0]['.$debut.'] : null), '.$pas.');';
 
 	$boucle->total_parties = $pas;
 	calculer_parties($boucles, $idb, $partie, 'p+');
 	// ajouter la cle primaire dans le select pour pouvoir gerer la pagination referencee par @id
 	// sauf si pas de primaire, ou si primaire composee
 	// dans ce cas, on ne sait pas gerer une pagination indirecte
-	$t = $boucle->id_table . '.' . $boucle->primary;
+	$t = $boucle->id_table.'.'.$boucle->primary;
 	if (
 		$boucle->primary
 		and !preg_match('/[,\s]/', $boucle->primary)
@@ -347,24 +346,24 @@ 
 	$boucle->hash .= '
 	// RECHERCHE'
 		. ($crit->cond ? '
-	if (!strlen(' . $quoi . ')){
+	if (!strlen(' . $quoi.')){
 		list($rech_select, $rech_where) = array("0 as points","");
-	} else' : '') . '
+	} else' : '').'
 	{
 		$prepare_recherche = charger_fonction(\'prepare_recherche\', \'inc\');
-		list($rech_select, $rech_where) = $prepare_recherche(' . $quoi . ', "' . $boucle->id_table . '", "' . $crit->cond . '","' . $boucle->sql_serveur . '",' . $_modificateur . ',"' . $boucle->primary . '");
+		list($rech_select, $rech_where) = $prepare_recherche(' . $quoi.', "'.$boucle->id_table.'", "'.$crit->cond.'","'.$boucle->sql_serveur.'",'.$_modificateur.',"'.$boucle->primary.'");
 	}
 	';
 
 
-	$t = $boucle->id_table . '.' . $boucle->primary;
+	$t = $boucle->id_table.'.'.$boucle->primary;
 	if (!in_array($t, $boucles[$idb]->select)) {
 		$boucle->select[] = $t;
 	} # pour postgres, neuneu ici
 	// jointure uniquement sur le serveur principal
 	// (on ne peut joindre une table d'un serveur distant avec la table des resultats du serveur principal)
 	if (!$boucle->sql_serveur) {
-		$boucle->join['resultats'] = ["'" . $boucle->id_table . "'", "'id'", "'" . $boucle->primary . "'"];
+		$boucle->join['resultats'] = ["'".$boucle->id_table."'", "'id'", "'".$boucle->primary."'"];
 		$boucle->from['resultats'] = 'spip_resultats';
 	}
 	$boucle->select[] = '$rech_select';
@@ -431,7 +430,7 @@ 
 	$c =
 		[
 			"'OR'",
-			["'='", "'$table." . "id_trad'", "'$table.$prim'"],
+			["'='", "'$table."."id_trad'", "'$table.$prim'"],
 			["'='", "'$table.id_trad'", "'0'"]
 		];
 	$boucle->where[] = ($crit->not ? ["'NOT'", $c] : $c);
@@ -454,15 +453,14 @@ 
 	$boucle = &$boucles[$idb];
 	$arg = kwote(calculer_argument_precedent($idb, 'id_parent', $boucles));
 	$id_parent = isset($GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent']) ?
-		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] :
-		'id_parent';
-	$mparent = $boucle->id_table . '.' . $id_parent;
+		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] : 'id_parent';
+	$mparent = $boucle->id_table.'.'.$id_parent;
 
 	if ($boucle->type_requete == 'rubriques' or isset($GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'])) {
 		$boucle->where[] = ["'='", "'$mparent'", $arg];
 	} // le cas FORUMS est gere dans le plugin forum, dans la fonction critere_FORUMS_meme_parent_dist()
 	else {
-		return (['zbug_critere_inconnu', ['critere' => $crit->op . ' ' . $boucle->type_requete]]);
+		return (['zbug_critere_inconnu', ['critere' => $crit->op.' '.$boucle->type_requete]]);
 	}
 }
 
@@ -515,16 +513,15 @@ 
 		if (count(trouver_champs_decomposes($champ, $desc)) > 1) {
 			$decompose = decompose_champ_id_objet($champ);
 			$champ = array_shift($decompose);
-			$boucle->where[] = ["'='", _q($cle . '.' . reset($decompose)), '"' . sql_quote(end($decompose)) . '"'];
+			$boucle->where[] = ["'='", _q($cle.'.'.reset($decompose)), '"'.sql_quote(end($decompose)).'"'];
 		}
 	} else {
 		$cle = $boucle->id_table;
 	}
 
-	$c = "sql_in('$cle" . ".$champ', calcul_branche_in($arg)"
-		. ($not ? ", 'NOT'" : '') . ')';
-	$boucle->where[] = !$crit->cond ? $c :
-		("($arg ? $c : " . ($not ? "'0=1'" : "'1=1'") . ')');
+	$c = "sql_in('$cle".".$champ', calcul_branche_in($arg)"
+		. ($not ? ", 'NOT'" : '').')';
+	$boucle->where[] = !$crit->cond ? $c : ("($arg ? $c : ".($not ? "'0=1'" : "'1=1'").')');
 }
 
 /**
@@ -544,9 +541,9 @@ 
 	$not = ($crit->not ? 'NOT' : '');
 	$serveur = $boucle->sql_serveur;
 
-	$c = "sql_in('" .
-		$boucle->id_table . '.' . $boucle->primary
-		. "', lister_objets_avec_logos('" . $boucle->primary . "'), '$not', '$serveur')";
+	$c = "sql_in('".
+		$boucle->id_table.'.'.$boucle->primary
+		. "', lister_objets_avec_logos('".$boucle->primary."'), '$not', '$serveur')";
 
 	$boucle->where[] = $c;
 }
@@ -578,7 +575,7 @@ 
 				$t = table_objet_sql($r[1]);
 				$t = array_search($t, $boucles[$idb]->from);
 				if ($t) {
-					$t .= '.' . $r[2];
+					$t .= '.'.$r[2];
 				}
 			}
 		} else {
@@ -593,7 +590,7 @@ 
 			$boucles[$idb]->select[] = $t;
 		}
 	} else {
-		return (['zbug_critere_inconnu', ['critere' => $crit->op . ' ?']]);
+		return (['zbug_critere_inconnu', ['critere' => $crit->op.' ?']]);
 	}
 }
 
@@ -663,26 +660,26 @@ 
 				(false !== $i = strpos($boucle->order[$n - 1], 'ASC'))
 				or (false !== $i = strpos($boucle->order[$n - 1], 'DESC'))
 			) {
-				$boucle->order[$n - 1] = substr_replace($boucle->order[$n - 1], "' . " . $boucle->modificateur['collate'] . " . ' ", $i, 0);
+				$boucle->order[$n - 1] = substr_replace($boucle->order[$n - 1], "' . ".$boucle->modificateur['collate']." . ' ", $i, 0);
 			} else {
-				$boucle->order[$n - 1] .= ' . ' . $boucle->modificateur['collate'];
+				$boucle->order[$n - 1] .= ' . '.$boucle->modificateur['collate'];
 			}
 		}
 	} else {
-		return (['zbug_critere_inconnu', ['critere' => $crit->op . ' ' . count($boucles[$idb]->order)]]);
+		return (['zbug_critere_inconnu', ['critere' => $crit->op.' '.count($boucles[$idb]->order)]]);
 	}
 }
 
 // https://code.spip.net/@calculer_critere_arg_dynamique
 function calculer_critere_arg_dynamique($idb, &$boucles, $crit, $suffix = '') {
 	$boucle = $boucles[$idb];
-	$alt = "('" . $boucle->id_table . '.\' . $x' . $suffix . ')';
-	$var = '$champs_' . $idb;
+	$alt = "('".$boucle->id_table.'.\' . $x'.$suffix.')';
+	$var = '$champs_'.$idb;
 	$desc = (strpos($boucle->in, "static $var =") !== false);
 	if (!$desc) {
 		$desc = $boucle->show['field'];
 		$desc = implode(',', array_map('_q', array_keys($desc)));
-		$boucles[$idb]->in .= "\n\tstatic $var = array(" . $desc . ');';
+		$boucles[$idb]->in .= "\n\tstatic $var = array(".$desc.');';
 	}
 	if ($desc) {
 		$alt = "(in_array(\$x, $var)  ? $alt :(\$x$suffix))";
@@ -757,7 +754,7 @@ 
 		$sens = " . ' DESC'";
 	}
 	if (isset($boucle->modificateur['collate'])) {
-		$collecte = ' . ' . $boucle->modificateur['collate'];
+		$collecte = ' . '.$boucle->modificateur['collate'];
 	}
 
 	// Pour chaque paramètre du critère
@@ -779,14 +776,14 @@ 
 			if (preg_match(',^(\w+)[\s]+(.*)$,', $par, $m)) {
 				$expression = trim($m[1]);
 				$champ = trim($m[2]);
-				if (function_exists($f = 'calculer_critere_par_expression_' . $expression)) {
+				if (function_exists($f = 'calculer_critere_par_expression_'.$expression)) {
 					$order = $f($idb, $boucles, $crit, $tri, $champ);
 				} else {
-					return ['zbug_critere_inconnu', ['critere' => $crit->op . " $par"]];
+					return ['zbug_critere_inconnu', ['critere' => $crit->op." $par"]];
 				}
 
 			// tris de la forme {par champ} ou {par FONCTION(champ)}
-			} elseif (preg_match(',^' . CHAMP_SQL_PLUS_FONC . '$,is', $par, $match)) {
+			} elseif (preg_match(',^'.CHAMP_SQL_PLUS_FONC.'$,is', $par, $match)) {
 				// {par FONCTION(champ)}
 				if (count($match) > 2) {
 					$par = substr($match[2], 1, -1);
@@ -796,7 +793,7 @@ 
 				if ($par == 'hasard') {
 					$order = calculer_critere_par_hasard($idb, $boucles, $crit);
 				} elseif ($par == 'date' and !empty($boucle->show['date'])) {
-					$order = "'" . $boucle->id_table . '.' . $boucle->show['date'] . "'";
+					$order = "'".$boucle->id_table.'.'.$boucle->show['date']."'";
 				} else {
 					// cas général {par champ}, {par table.champ}, ...
 					$order = calculer_critere_par_champ($idb, $boucles, $crit, $par);
@@ -805,7 +802,7 @@ 
 
 			// on ne sait pas traiter…
 			else {
-				return ['zbug_critere_inconnu', ['critere' => $crit->op . " $par"]];
+				return ['zbug_critere_inconnu', ['critere' => $crit->op." $par"]];
 			}
 
 			// En cas d'erreur de squelette retournée par une fonction
@@ -825,14 +822,14 @@ 
 
 		if ($fct) {
 			if (preg_match("/^\s*'(.*)'\s*$/", $order, $r)) {
-				$order = "'$fct(" . $r[1] . ")'";
+				$order = "'$fct(".$r[1].")'";
 			} else {
 				$order = "'$fct(' . $order . ')'";
 			}
 		}
-		$t = $order . $collecte . $sens;
+		$t = $order.$collecte.$sens;
 		if (preg_match("/^(.*)'\s*\.\s*'([^']*')$/", $t, $r)) {
-			$t = $r[1] . $r[2];
+			$t = $r[1].$r[2];
 		}
 
 		$boucle->order[] = $t;
@@ -882,16 +879,16 @@ 
 function calculer_critere_par_expression_num($idb, &$boucles, $crit, $tri, $champ) {
 	$_champ = calculer_critere_par_champ($idb, $boucles, $crit, $champ, true);
 	if (is_array($_champ)) {
-		return ['zbug_critere_inconnu', ['critere' => $crit->op . " num $champ"]];
+		return ['zbug_critere_inconnu', ['critere' => $crit->op." num $champ"]];
 	}
 	$boucle = &$boucles[$idb];
-	$texte = '0+' . $_champ;
+	$texte = '0+'.$_champ;
 	$suite = calculer_liste($tri, $idb, $boucles, $boucle->id_parent);
 	if ($suite !== "''") {
-		$texte = "\" . ((\$x = $suite) ? ('$texte' . \$x) : '0')" . ' . "';
+		$texte = "\" . ((\$x = $suite) ? ('$texte' . \$x) : '0')".' . "';
 	}
-	$asnum = 'num' . ($boucle->order ? count($boucle->order) : '');
-	$boucle->select[] = $texte . " AS $asnum";
+	$asnum = 'num'.($boucle->order ? count($boucle->order) : '');
+	$boucle->select[] = $texte." AS $asnum";
 
 	$orderassinum = calculer_critere_par_expression_sinum($idb, $boucles, $crit, $tri, $champ);
 	$orderassinum = trim($orderassinum, "'");
@@ -920,13 +917,13 @@ 
 function calculer_critere_par_expression_sinum($idb, &$boucles, $crit, $tri, $champ) {
 	$_champ = calculer_critere_par_champ($idb, $boucles, $crit, $champ, true);
 	if (is_array($_champ)) {
-		return ['zbug_critere_inconnu', ['critere' => $crit->op . " sinum $champ"]];
+		return ['zbug_critere_inconnu', ['critere' => $crit->op." sinum $champ"]];
 	}
 	$boucle = &$boucles[$idb];
-	$texte = '0+' . $_champ;
+	$texte = '0+'.$_champ;
 	$suite = calculer_liste($tri, $idb, $boucles, $boucle->id_parent);
 	if ($suite !== "''") {
-		$texte = "\" . ((\$x = $suite) ? ('$texte' . \$x) : '0')" . ' . "';
+		$texte = "\" . ((\$x = $suite) ? ('$texte' . \$x) : '0')".' . "';
 	}
 
 	$as = false;
@@ -942,8 +939,8 @@ 
 	}
 
 	if (!$as) {
-		$as = 'sinum' . ($boucle->order ? count($boucle->order) : '');
-		$boucle->select[] = $select . $as;
+		$as = 'sinum'.($boucle->order ? count($boucle->order) : '');
+		$boucle->select[] = $select.$as;
 	}
 	$order = "'$as'";
 	return $order;
@@ -968,10 +965,10 @@ 
 function calculer_critere_par_expression_multi($idb, &$boucles, $crit, $tri, $champ) {
 	$_champ = calculer_critere_par_champ($idb, $boucles, $crit, $champ, true);
 	if (is_array($_champ)) {
-		return ['zbug_critere_inconnu', ['critere' => $crit->op . " multi $champ"]];
+		return ['zbug_critere_inconnu', ['critere' => $crit->op." multi $champ"]];
 	}
 	$boucle = &$boucles[$idb];
-	$boucle->select[] = "\".sql_multi('" . $_champ . "', \$GLOBALS['spip_lang']).\"";
+	$boucle->select[] = "\".sql_multi('".$_champ."', \$GLOBALS['spip_lang']).\"";
 	$order = "'multi'";
 	return $order;
 }
@@ -997,7 +994,7 @@ 
 
 	// le champ existe dans la table, pas de souci (le plus commun)
 	if (isset($desc['field'][$par])) {
-		$par = $boucle->id_table . '.' . $par;
+		$par = $boucle->id_table.'.'.$par;
 	}
 	// le champ est peut être une jointure
 	else {
@@ -1018,24 +1015,24 @@ 
 		// Sinon on cherche le champ dans les tables possibles de jointures
 		// Si la table est déjà dans le from, on la réutilise.
 		if ($infos = chercher_champ_dans_tables($champ, $boucle->from, $boucle->sql_serveur, $table)) {
-			$par = $infos['alias'] . '.' . $champ;
+			$par = $infos['alias'].'.'.$champ;
 		} elseif (
 			$boucle->jointures_explicites
 			and $alias = trouver_jointure_champ($champ, $boucle, explode(' ', $boucle->jointures_explicites), false, $table)
 		) {
-			$par = $alias . '.' . $champ;
+			$par = $alias.'.'.$champ;
 		} elseif ($alias = trouver_jointure_champ($champ, $boucle, $boucle->jointures, false, $table)) {
-			$par = $alias . '.' . $champ;
+			$par = $alias.'.'.$champ;
 		// en spécifiant directement l'alias {par L2.titre} (situation hasardeuse tout de même)
 		} elseif (
 			$table_alias
 			and isset($boucle->from[$table_alias])
 			and $infos = chercher_champ_dans_tables($champ, $boucle->from, $boucle->sql_serveur, $boucle->from[$table_alias])
 		) {
-			$par = $infos['alias'] . '.' . $champ;
+			$par = $infos['alias'].'.'.$champ;
 		} elseif ($table) {
 			// On avait table + champ, mais on ne les a pas trouvés
-			return ['zbug_critere_inconnu', ['critere' => $crit->op . " $par"]];
+			return ['zbug_critere_inconnu', ['critere' => $crit->op." $par"]];
 		} else {
 			// Sinon tant pis, ca doit etre un champ synthetise (cf points)
 		}
@@ -1059,7 +1056,7 @@ 
 	if (!$t) {
 		$t = trouver_jointure_champ($champ, $boucle);
 	}
-	return !$t ? '' : ("'" . $t . '.' . $champ . "'");
+	return !$t ? '' : ("'".$t.'.'.$champ."'");
 }
 
 /**
@@ -1104,9 +1101,9 @@ 
 				$boucle->default_order[] = ' DESC';
 			}
 		} else {
-			$t = $boucle->order[$n - 1] . " . $order";
+			$t = $boucle->order[$n - 1]." . $order";
 			if (preg_match("/^(.*)'\s*\.\s*'([^']*')$/", $t, $r)) {
-				$t = $r[1] . $r[2];
+				$t = $r[1].$r[2];
 			}
 			$boucle->order[$n - 1] = $t;
 		}
@@ -1141,7 +1138,7 @@ 
 	$_order = array_pop($boucle->order);
 
 	$_liste = calculer_liste($crit->param[1], [], $boucles, $boucles[$idb]->id_parent);
-	$boucle->order[] = "'FIELD(' . $_order . ',' . ((\$zl=formate_liste_critere_par_ordre_liste($_liste,'" . $boucle->sql_serveur . "')) ? \$zl : '0').')'$sens";
+	$boucle->order[] = "'FIELD(' . $_order . ',' . ((\$zl=formate_liste_critere_par_ordre_liste($_liste,'".$boucle->sql_serveur."')) ? \$zl : '0').')'$sens";
 }
 
 
@@ -1150,7 +1147,7 @@ 
 	$params = $crit->param;
 
 	if (count($params) < 1) {
-		return ['zbug_critere_inconnu', ['critere' => $crit->op . ' ?']];
+		return ['zbug_critere_inconnu', ['critere' => $crit->op.' ?']];
 	}
 
 	$boucle = &$boucles[$idb];
@@ -1171,7 +1168,7 @@ 
 	if ((count($date) == 1) and ($date[0]->type == 'texte')) {
 		$date = $date[0]->texte;
 		if (!isset($fields[$date])) {
-			return ['zbug_critere_inconnu', ['critere' => $crit->op . ' ' . $date]];
+			return ['zbug_critere_inconnu', ['critere' => $crit->op.' '.$date]];
 		}
 	} else {
 		$a = calculer_liste($date, $idb, $boucles, $parent);
@@ -1183,38 +1180,38 @@ 
 		$date = "'.(($cond)\n?\$a:\"$defaut\").'";
 	}
 	$annee = $params ? array_shift($params) : '';
-	$annee = "\n" . 'sprintf("%04d", ($x = ' .
-		calculer_liste($annee, $idb, $boucles, $parent) .
+	$annee = "\n".'sprintf("%04d", ($x = '.
+		calculer_liste($annee, $idb, $boucles, $parent).
 		') ? $x : date("Y"))';
 
 	$mois = $params ? array_shift($params) : '';
-	$mois = "\n" . 'sprintf("%02d", ($x = ' .
-		calculer_liste($mois, $idb, $boucles, $parent) .
+	$mois = "\n".'sprintf("%02d", ($x = '.
+		calculer_liste($mois, $idb, $boucles, $parent).
 		') ? $x : date("m"))';
 
 	$jour = $params ? array_shift($params) : '';
-	$jour = "\n" . 'sprintf("%02d", ($x = ' .
-		calculer_liste($jour, $idb, $boucles, $parent) .
+	$jour = "\n".'sprintf("%02d", ($x = '.
+		calculer_liste($jour, $idb, $boucles, $parent).
 		') ? $x : date("d"))';
 
 	$annee2 = $params ? array_shift($params) : '';
-	$annee2 = "\n" . 'sprintf("%04d", ($x = ' .
-		calculer_liste($annee2, $idb, $boucles, $parent) .
+	$annee2 = "\n".'sprintf("%04d", ($x = '.
+		calculer_liste($annee2, $idb, $boucles, $parent).
 		') ? $x : date("Y"))';
 
 	$mois2 = $params ? array_shift($params) : '';
-	$mois2 = "\n" . 'sprintf("%02d", ($x = ' .
-		calculer_liste($mois2, $idb, $boucles, $parent) .
+	$mois2 = "\n".'sprintf("%02d", ($x = '.
+		calculer_liste($mois2, $idb, $boucles, $parent).
 		') ? $x : date("m"))';
 
 	$jour2 = $params ? array_shift($params) : '';
-	$jour2 = "\n" . 'sprintf("%02d", ($x = ' .
-		calculer_liste($jour2, $idb, $boucles, $parent) .
+	$jour2 = "\n".'sprintf("%02d", ($x = '.
+		calculer_liste($jour2, $idb, $boucles, $parent).
 		') ? $x : date("d"))';
 
-	$date = $boucle->id_table . ".$date";
+	$date = $boucle->id_table.".$date";
 
-	$quote_end = ",'" . $boucle->sql_serveur . "','text'";
+	$quote_end = ",'".$boucle->sql_serveur."','text'";
 	if ($type == 'jour') {
 		$boucle->where[] = [
 			"'='",
@@ -1286,14 +1283,13 @@ 
 	list($a21, $a22) = calculer_critere_parties_aux($idb, $boucles, $a2);
 
 	if (($op == ',') && (is_numeric($a11) && (is_numeric($a21)))) {
-		$boucle->limit = $a11 . ',' . $a21;
+		$boucle->limit = $a11.','.$a21;
 	} else {
 		// 3 dans {1/3}, {2,3} ou {1,n-3}
 		$boucle->total_parties = ($a21 != 'n') ? $a21 : $a22;
 		// 2 dans {2/3}, {2,5}, {n-2,1}
 		$partie = ($a11 != 'n') ? $a11 : $a12;
-		$mode = (($op == '/') ? '/' :
-			(($a11 == 'n') ? '-' : '+') . (($a21 == 'n') ? '-' : '+'));
+		$mode = (($op == '/') ? '/' : (($a11 == 'n') ? '-' : '+').(($a21 == 'n') ? '-' : '+'));
 		// cas simple {0,#ENV{truc}} compilons le en LIMIT :
 		if ($a11 !== 'n' and $a21 !== 'n' and $mode == '++' and $op == ',') {
 			$boucle->limit =
@@ -1339,8 +1335,7 @@ 
 	// {1/3}
 	if ($op1 == '/') {
 		$pmoins1 = is_numeric($debut) ? ($debut - 1) : "($debut-1)";
-		$totpos = is_numeric($total_parties) ? ($total_parties) :
-			"($total_parties ? $total_parties : 1)";
+		$totpos = is_numeric($total_parties) ? ($total_parties) : "($total_parties ? $total_parties : 1)";
 		$fin = "ceil(($nombre_boucle * $debut )/$totpos) - 1";
 		$debut = !$pmoins1 ? 0 : "ceil(($nombre_boucle * $pmoins1)/$totpos);";
 	} else {
@@ -1351,15 +1346,13 @@ 
 
 		// cas {x,n-1}
 		if ($op2 == '-') {
-			$fin = '$debut_boucle + ' . $nombre_boucle . ' - '
-				. (is_numeric($total_parties) ? ($total_parties + 1) :
-					($total_parties . ' - 1'));
+			$fin = '$debut_boucle + '.$nombre_boucle.' - '
+				. (is_numeric($total_parties) ? ($total_parties + 1) : ($total_parties.' - 1'));
 		} else {
 			// {x,1} ou {pagination}
 			$fin = '$debut_boucle'
 				. (is_numeric($total_parties) ?
-					(($total_parties == 1) ? '' : (' + ' . ($total_parties - 1))) :
-					('+' . $total_parties . ' - 1'));
+					(($total_parties == 1) ? '' : (' + '.($total_parties - 1))) : ('+'.$total_parties.' - 1'));
 		}
 
 		// {pagination}, gerer le debut_xx=-1 pour tout voir
@@ -1377,11 +1370,11 @@ 
 	// Utiliser min pour rabattre $fin_boucle sur total_boucle.
 
 	$boucles[$id_boucle]->mode_partie = "\n\t"
-		. '$debut_boucle = ' . $debut . ";\n	"
+		. '$debut_boucle = '.$debut.";\n	"
 		. "\$debut_boucle = intval(\$debut_boucle);\n	"
-		. '$fin_boucle = min(' . $fin . ", \$Numrows['$id_boucle']['total'] - 1);\n	"
-		. '$Numrows[\'' . $id_boucle . "']['grand_total'] = \$Numrows['$id_boucle']['total'];\n	"
-		. '$Numrows[\'' . $id_boucle . '\']["total"] = max(0,$fin_boucle - $debut_boucle + 1);'
+		. '$fin_boucle = min('.$fin.", \$Numrows['$id_boucle']['total'] - 1);\n	"
+		. '$Numrows[\''.$id_boucle."']['grand_total'] = \$Numrows['$id_boucle']['total'];\n	"
+		. '$Numrows[\''.$id_boucle.'\']["total"] = max(0,$fin_boucle - $debut_boucle + 1);'
 		. "\n\tif (\$debut_boucle>0"
 		. " AND \$debut_boucle < \$Numrows['$id_boucle']['grand_total']"
 		. " AND \$iter->seek(\$debut_boucle,'continue'))"
@@ -1466,16 +1459,16 @@ 
 		// critere personnalise ?
 		if (
 			(!$serveur or
-				((!function_exists($f = 'critere_' . $serveur . '_' . $table . '_' . $critere))
-					and (!function_exists($f = $f . '_dist'))
-					and (!function_exists($f = 'critere_' . $serveur . '_' . $critere))
-					and (!function_exists($f = $f . '_dist'))
+				((!function_exists($f = 'critere_'.$serveur.'_'.$table.'_'.$critere))
+					and (!function_exists($f = $f.'_dist'))
+					and (!function_exists($f = 'critere_'.$serveur.'_'.$critere))
+					and (!function_exists($f = $f.'_dist'))
 				)
 			)
-			and (!function_exists($f = 'critere_' . $table . '_' . $critere))
-			and (!function_exists($f = $f . '_dist'))
-			and (!function_exists($f = 'critere_' . $critere))
-			and (!function_exists($f = $f . '_dist'))
+			and (!function_exists($f = 'critere_'.$table.'_'.$critere))
+			and (!function_exists($f = $f.'_dist'))
+			and (!function_exists($f = 'critere_'.$critere))
+			and (!function_exists($f = $f.'_dist'))
 		) {
 			// fonction critere standard
 			$f = $defaut;
@@ -1508,9 +1501,9 @@ 
  */
 function kwote($lisp, $serveur = '', $type = '') {
 	if (preg_match(_CODE_QUOTE, $lisp, $r)) {
-		return $r[1] . '"' . sql_quote(str_replace(["\\'", '\\\\'], ["'", '\\'], $r[2]), $serveur, $type) . '"';
+		return $r[1].'"'.sql_quote(str_replace(["\\'", '\\\\'], ["'", '\\'], $r[2]), $serveur, $type).'"';
 	} else {
-		return "sql_quote($lisp, '$serveur', '" . str_replace("'", "\\'", $type) . "')";
+		return "sql_quote($lisp, '$serveur', '".str_replace("'", "\\'", $type)."')";
 	}
 }
 
@@ -1532,7 +1525,7 @@ 
 function critere_IN_dist($idb, &$boucles, $crit) {
 	$r = calculer_critere_infixe($idb, $boucles, $crit);
 	if (!$r) {
-		return (['zbug_critere_inconnu', ['critere' => $crit->op . ' ?']]);
+		return (['zbug_critere_inconnu', ['critere' => $crit->op.' ?']]);
 	}
 	list($arg, $op, $val, $col, $where_complement) = $r;
 
@@ -1557,8 +1550,8 @@ 
 				"'NOT'",
 				[
 					"'IN'",
-					"'" . $boucles[$idb]->id_table . '.' . $boucles[$idb]->primary . "'",
-					["'SELF'", "'" . $boucles[$idb]->id_table . '.' . $boucles[$idb]->primary . "'", $where]
+					"'".$boucles[$idb]->id_table.'.'.$boucles[$idb]->primary."'",
+					["'SELF'", "'".$boucles[$idb]->id_table.'.'.$boucles[$idb]->primary."'", $where]
 				]
 			];
 		}
@@ -1576,22 +1569,22 @@ 
 	$descr = $boucles[$idb]->descr;
 	$cpt = &$num[$descr['nom']][$descr['gram']][$idb];
 
-	$var = '$in' . $cpt++;
+	$var = '$in'.$cpt++;
 	$x = "\n\t$var = array();";
 	foreach ($val as $k => $v) {
 		if (preg_match(",^(\n//.*\n)?'(.*)'$,", $v, $r)) {
 			// optimiser le traitement des constantes
 			if (is_numeric($r[2])) {
-				$x .= "\n\t$var" . "[]= $r[2];";
+				$x .= "\n\t$var"."[]= $r[2];";
 			} else {
-				$x .= "\n\t$var" . '[]= ' . sql_quote($r[2]) . ';';
+				$x .= "\n\t$var".'[]= '.sql_quote($r[2]).';';
 			}
 		} else {
 			// Pour permettre de passer des tableaux de valeurs
 			// on repere l'utilisation brute de #ENV**{X},
 			// c'est-a-dire sa  traduction en ($PILE[0][X]).
 			// et on deballe mais en rajoutant l'anti XSS
-			$x .= "\n\tif (!(is_array(\$a = ($v))))\n\t\t$var" . "[]= \$a;\n\telse $var = array_merge($var, \$a);";
+			$x .= "\n\tif (!(is_array(\$a = ($v))))\n\t\t$var"."[]= \$a;\n\telse $var = array_merge($var, \$a);";
 		}
 	}
 
@@ -1605,7 +1598,7 @@ 
 		$boucles[$idb]->default_order[] = "((!\$zqv=sql_quote($var) OR \$zqv===\"''\") ? 0 : ('FIELD($arg,' . \$zqv . ')'))";
 	}
 
-	return "sql_in('$arg', $var" . ($crit2 == 'NOT' ? ",'NOT'" : '') . ')';
+	return "sql_in('$arg', $var".($crit2 == 'NOT' ? ",'NOT'" : '').')';
 }
 
 /**
@@ -1678,7 +1671,7 @@ 
 		$champs = array_diff($champs, array_keys($boucle->modificateur['criteres']));
 	}
 	// nous aider en mode debug.
-	$boucle->debug[] = 'id_ : ' . implode(', ', $champs);
+	$boucle->debug[] = 'id_ : '.implode(', ', $champs);
 	$boucle->modificateur['id_'] = $champs;
 
 	// créer un critère {id_xxx?} de chaque champ retenu
@@ -1719,7 +1712,7 @@ 
 	// Les champs id_xx de la table demandée
 	$champs = array_filter(
 		array_keys($desc['field']),
-		function ($champ) {
+		function($champ) {
 			return
 				strpos($champ, 'id_') === 0
 				or (in_array($champ, ['objet']));
@@ -1933,8 +1926,8 @@ 
 				"'NOT'",
 				[
 					"'IN'",
-					"'" . $boucles[$idb]->id_table . '.' . $boucles[$idb]->primary . "'",
-					["'SELF'", "'" . $boucles[$idb]->id_table . '.' . $boucles[$idb]->primary . "'", $where]
+					"'".$boucles[$idb]->id_table.'.'.$boucles[$idb]->primary."'",
+					["'SELF'", "'".$boucles[$idb]->id_table.'.'.$boucles[$idb]->primary."'", $where]
 				]
 			];
 		}
@@ -1945,7 +1938,7 @@ 
 	if ($crit->cond) {
 		$pred = calculer_argument_precedent($idb, $col, $boucles);
 		if ($col == 'date' or $col == 'date_redac') {
-			if ($pred == "\$Pile[0]['" . $col . "']") {
+			if ($pred == "\$Pile[0]['".$col."']") {
 				$pred = "(\$Pile[0]['{$col}_default']?'':$pred)";
 			}
 		}
@@ -2106,7 +2099,7 @@ 
 		// defaire le quote des int et les passer dans sql_quote avec le bon type de champ si on le connait, int sinon
 		// prendre en compte le debug ou la valeur arrive avec un commentaire PHP en debut
 		if (preg_match(",^\\A(\s*//.*?$\s*)?\"'(-?\d+)'\"\\z,ms", $val[0], $r)) {
-			$val[0] = $r[1] . '"' . sql_quote($r[2], $boucle->sql_serveur, $type_cast_quote) . '"';
+			$val[0] = $r[1].'"'.sql_quote($r[2], $boucle->sql_serveur, $type_cast_quote).'"';
 		}
 		// sinon expliciter les
 		// sql_quote(truc) en sql_quote(truc,'',type)
@@ -2122,14 +2115,14 @@ 
 		) {
 			$r = $r[1]
 				. ((isset($r[2]) and $r[2]) ? $r[2] : ",''")
-				. ",'" . addslashes($type_cast_quote) . "'";
+				. ",'".addslashes($type_cast_quote)."'";
 			$val[0] = "sql_quote($r)";
 		}
 		elseif (
 			strpos($val[0], '@@defaultcast@@') !== false
 			and preg_match("/'@@defaultcast@@'\s*\)\s*\z/ms", $val[0], $r)
 		) {
-			$val[0] = substr($val[0], 0, -strlen($r[0])) . "'" . addslashes($type_cast_quote) . "')";
+			$val[0] = substr($val[0], 0, -strlen($r[0]))."'".addslashes($type_cast_quote)."')";
 		}
 	}
 
@@ -2137,7 +2130,7 @@ 
 		strpos($val[0], '@@defaultcast@@') !== false
 		and preg_match("/'@@defaultcast@@'\s*\)\s*\z/ms", $val[0], $r)
 	) {
-		$val[0] = substr($val[0], 0, -strlen($r[0])) . "'char')";
+		$val[0] = substr($val[0], 0, -strlen($r[0]))."'char')";
 	}
 
 	// Indicateur pour permettre aux fonctionx boucle_X de modifier
@@ -2153,7 +2146,7 @@ 
 	// inserer le nom de la table SQL devant le nom du champ
 	if ($table) {
 		if ($col[0] == '`') {
-			$arg = "$table." . substr($col, 1, -1);
+			$arg = "$table.".substr($col, 1, -1);
 		} else {
 			$arg = "$table.$col";
 		}
@@ -2288,9 +2281,9 @@ 
  **/
 function primary_doublee($decompose, $table) {
 	$e1 = reset($decompose);
-	$e2 = "sql_quote('" . end($decompose) . "')";
+	$e2 = "sql_quote('".end($decompose)."')";
 
-	return ["'='", "'$table." . $e1 . "'", $e2];
+	return ["'='", "'$table.".$e1."'", $e2];
 }
 
 /**
@@ -2329,7 +2322,7 @@ 
 		$checkarrivee
 		and is_string($checkarrivee)
 		and $a = table_objet($checkarrivee)
-		and in_array($a . '_liens', $joints)
+		and in_array($a.'_liens', $joints)
 	) {
 		if ($res = calculer_lien_externe_init($boucle, $joints, $col, $desc, $cond, $checkarrivee)) {
 			return $res;
@@ -2349,12 +2342,12 @@ 
 				// la table est déjà dans le FROM, on vérifie si le champ est utilisé.
 				$joindre = false;
 				foreach ($cols as $col) {
-					$c = '/\b' . $t . ".$col" . '\b/';
+					$c = '/\b'.$t.".$col".'\b/';
 					if (trouver_champ($c, $boucle->where)) {
 						$joindre = true;
 					} else {
 						// mais ca peut etre dans le FIELD pour le Having
-						$c = "/FIELD.$t" . ".$col,/";
+						$c = "/FIELD.$t".".$col,/";
 						if (trouver_champ($c, $boucle->select)) {
 							$joindre = true;
 						}
@@ -2400,7 +2393,7 @@ 
 	$primary_arrivee = id_table_objet($checkarrivee);
 
 	// [FIXME] $checkarrivee peut-il arriver avec false ????
-	$intermediaire = trouver_champ_exterieur($primary_arrivee, $joints, $boucle, $checkarrivee . '_liens');
+	$intermediaire = trouver_champ_exterieur($primary_arrivee, $joints, $boucle, $checkarrivee.'_liens');
 	$arrivee = trouver_champ_exterieur($col, $joints, $boucle, $checkarrivee);
 
 	if (!$intermediaire or !$arrivee) {
@@ -2504,7 +2497,7 @@ 
 			} elseif ($crit->cond and ($col == 'date' or $col == 'date_redac')) {
 				// un critere conditionnel sur date est traite a part
 				// car la date est mise d'office par SPIP,
-				$defaut = "(\$Pile[0]['{$col}_default']?'':\$Pile[0]['" . $col . "'])";
+				$defaut = "(\$Pile[0]['{$col}_default']?'':\$Pile[0]['".$col."'])";
 			}
 
 			$val = calculer_argument_precedent($idb, $val, $boucles, $defaut);
@@ -2536,7 +2529,7 @@ 
 			and (($p == "'") or ($p == '"'))
 			and $params[0][1]->type == 'champ'
 		) {
-			$val[] = "$p\\$p#" . $params[0][1]->nom_champ . "\\$p$p";
+			$val[] = "$p\\$p#".$params[0][1]->nom_champ."\\$p$p";
 		} else {
 			foreach ((($op != 'IN') ? $params : calculer_vieux_in($params)) as $p) {
 				$a = calculer_liste($p, $idb, $boucles, $parent);
@@ -2552,7 +2545,7 @@ 
 	$fct = $args_sql = '';
 	// fonction SQL ?
 	// chercher FONCTION(champ) tel que CONCAT(titre,descriptif)
-	if (preg_match('/^(.*)' . SQL_ARGS . '$/', $col, $m)) {
+	if (preg_match('/^(.*)'.SQL_ARGS.'$/', $col, $m)) {
 		$fct = $m[1];
 		preg_match('/^\(([^,]*)(.*)\)$/', $m[2], $a);
 		$col = $a[1];
@@ -2643,7 +2636,7 @@ 
 		# si oui choisir ce champ, sinon choisir xxxx
 
 		if (isset($table['field']["date$suite"])) {
-			$date_orig = 'date' . $suite;
+			$date_orig = 'date'.$suite;
 		} else {
 			$date_orig = substr($suite, 1);
 		}
@@ -2654,12 +2647,12 @@ 
 		}
 	}
 
-	$date_compare = "\"' . normaliser_date(" .
-		calculer_argument_precedent($idb, $pred, $boucles) .
+	$date_compare = "\"' . normaliser_date(".
+		calculer_argument_precedent($idb, $pred, $boucles).
 		") . '\"";
 
 	$col_vraie = $date_orig;
-	$date_orig = $boucle->id_table . '.' . $date_orig;
+	$date_orig = $boucle->id_table.'.'.$date_orig;
 
 	switch ($col) {
 		case 'date':
@@ -2679,26 +2672,26 @@ 
 			break;
 		case 'age':
 			$col = calculer_param_date("\'' . date('Y-m-d H:i:00') . '\'", $date_orig);
-			$col_vraie = '';// comparer a un int (par defaut)
+			$col_vraie = ''; // comparer a un int (par defaut)
 			break;
 		case 'age_relatif':
 			$col = calculer_param_date($date_compare, $date_orig);
-			$col_vraie = '';// comparer a un int (par defaut)
+			$col_vraie = ''; // comparer a un int (par defaut)
 			break;
 		case 'jour_relatif':
-			$col = '(TO_DAYS(' . $date_compare . ')-TO_DAYS(' . $date_orig . '))';
-			$col_vraie = '';// comparer a un int (par defaut)
+			$col = '(TO_DAYS('.$date_compare.')-TO_DAYS('.$date_orig.'))';
+			$col_vraie = ''; // comparer a un int (par defaut)
 			break;
 		case 'mois_relatif':
-			$col = 'MONTH(' . $date_compare . ')-MONTH(' .
-				$date_orig . ')+12*(YEAR(' . $date_compare .
-				')-YEAR(' . $date_orig . '))';
-			$col_vraie = '';// comparer a un int (par defaut)
+			$col = 'MONTH('.$date_compare.')-MONTH('.
+				$date_orig.')+12*(YEAR('.$date_compare.
+				')-YEAR('.$date_orig.'))';
+			$col_vraie = ''; // comparer a un int (par defaut)
 			break;
 		case 'annee_relatif':
-			$col = 'YEAR(' . $date_compare . ')-YEAR(' .
-				$date_orig . ')';
-			$col_vraie = '';// comparer a un int (par defaut)
+			$col = 'YEAR('.$date_compare.')-YEAR('.
+				$date_orig.')';
+			$col_vraie = ''; // comparer a un int (par defaut)
 			break;
 	}
 
@@ -2759,10 +2752,10 @@ 
 	}
 
 	$boucle->hash .= '
-	$command[\'sourcemode\'] = ' . array_shift($args) . ";\n";
+	$command[\'sourcemode\'] = ' . array_shift($args).";\n";
 
 	$boucle->hash .= '
-	$command[\'source\'] = array(' . join(', ', $args) . ");\n";
+	$command[\'source\'] = array(' . join(', ', $args).");\n";
 }
 
 /**
@@ -2781,7 +2774,7 @@ 
 function critere_DATA_datacache_dist($idb, &$boucles, $crit) {
 	$boucle = &$boucles[$idb];
 	$boucle->hash .= '
-	$command[\'datacache\'] = ' . calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent) . ';';
+	$command[\'datacache\'] = ' . calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent).';';
 }
 
 
@@ -2800,7 +2793,7 @@ 
 	$boucle->hash .= '$command[\'args\']=array();';
 	foreach ($crit->param as $param) {
 		$boucle->hash .= '
-			$command[\'args\'][] = ' . calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent) . ';';
+			$command[\'args\'][] = ' . calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent).';';
 	}
 }
 
@@ -2819,14 +2812,14 @@ 
  */
 function critere_DATA_liste_dist($idb, &$boucles, $crit) {
 	$boucle = &$boucles[$idb];
-	$boucle->hash .= "\n\t" . '$command[\'liste\'] = array();' . "\n";
+	$boucle->hash .= "\n\t".'$command[\'liste\'] = array();'."\n";
 	foreach ($crit->param as $param) {
-		$boucle->hash .= "\t" . '$command[\'liste\'][] = ' . calculer_liste(
+		$boucle->hash .= "\t".'$command[\'liste\'][] = '.calculer_liste(
 			$param,
 			$idb,
 			$boucles,
 			$boucles[$idb]->id_parent
-		) . ";\n";
+		).";\n";
 	}
 }
 
@@ -2853,14 +2846,14 @@ 
  */
 function critere_DATA_enum_dist($idb, &$boucles, $crit) {
 	$boucle = &$boucles[$idb];
-	$boucle->hash .= "\n\t" . '$command[\'enum\'] = array();' . "\n";
+	$boucle->hash .= "\n\t".'$command[\'enum\'] = array();'."\n";
 	foreach ($crit->param as $param) {
-		$boucle->hash .= "\t" . '$command[\'enum\'][] = ' . calculer_liste(
+		$boucle->hash .= "\t".'$command[\'enum\'][] = '.calculer_liste(
 			$param,
 			$idb,
 			$boucles,
 			$boucles[$idb]->id_parent
-		) . ";\n";
+		).";\n";
 	}
 }
 
@@ -2879,7 +2872,7 @@ 
 	$boucle = &$boucles[$idb];
 	foreach ($crit->param as $param) {
 		$boucle->hash .= '
-			$command[\'datapath\'][] = ' . calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent) . ';';
+			$command[\'datapath\'][] = ' . calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent).';';
 	}
 }
 
@@ -2920,7 +2913,7 @@ 
 	if ($crit->param) {
 		foreach ($crit->param as $param) {
 			$boucle->hash .= "\t\$command['si'][] = "
-				. calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent) . ";\n";
+				. calculer_liste($param, $idb, $boucles, $boucles[$idb]->id_parent).";\n";
 		}
 		// interdire {si 0} aussi !
 	} else {
@@ -2944,7 +2937,7 @@ 
 function critere_POUR_tableau_dist($idb, &$boucles, $crit) {
 	$boucle = &$boucles[$idb];
 	$boucle->hash .= '
-	$command[\'source\'] = array(' . calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent) . ');
+	$command[\'source\'] = array(' . calculer_liste($crit->param[0], $idb, $boucles, $boucles[$idb]->id_parent).');
 	$command[\'sourcemode\'] = \'table\';';
 }
 
@@ -2977,11 +2970,10 @@ 
 	$table_sql = table_objet_sql(objet_type($table));
 
 	$id_parent = isset($GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent']) ?
-		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] :
-		'id_parent';
+		$GLOBALS['exceptions_des_tables'][$boucle->id_table]['id_parent'] : 'id_parent';
 
 	$in = 'IN';
-	$where = ["'IN'", "'$boucle->id_table." . "$primary'", "'('.sql_get_select('$id_parent', '$table_sql').')'"];
+	$where = ["'IN'", "'$boucle->id_table."."$primary'", "'('.sql_get_select('$id_parent', '$table_sql').')'"];
 	if ($not) {
 		$where = ["'NOT'", $where];
 	}

ecrire/public/normaliser.php

Spacing +2 added lines, -2 removed lines

@@ -52,7 +52,7 @@ 
 			array_shift($p->param);
 			$p->etoile = '*';
 			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
+		} elseif (preg_match('/^'.NOM_DE_CHAMP.'(.*)$/sS', $nom, $m)) {
 			$champ = new Champ();
 			$champ->nom_boucle = $m[2];
 			$champ->nom_champ = $m[3];
@@ -128,7 +128,7 @@ 
 		$p->param[0][1] = [$c];
 		$p->param[0][0] = '';
 		$p->fonctions = [];
-		spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
+		spip_log('FORMULAIRE_RECHERCHE avec filtre '.$c->texte, 'vieilles_defs');
 	}
 }
 

ecrire/public/sandbox.php

Spacing +5 added lines, -5 removed lines

@@ -41,7 +41,7 @@ 
  *     Texte
  */
 function sandbox_composer_texte($texte, &$p) {
-	$code = "'" . str_replace(['\\', "'"], ['\\\\', "\\'"], $texte) . "'";
+	$code = "'".str_replace(['\\', "'"], ['\\\\', "\\'"], $texte)."'";
 
 	return $code;
 }
@@ -85,7 +85,7 @@ 
 		$min_f = $refl->getNumberOfRequiredParameters();
 		if (($nb_args_f < $min_f)) {
 			$msg_args = ['filtre' => texte_script($fonc), 'nb' => $min_f - $nb_args_f];
-			erreur_squelette([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p);
+			erreur_squelette(['zbug_erreur_filtre_nbarg_min', $msg_args], $p);
 		}
 	}
 	// le filtre n'existe pas,
@@ -170,8 +170,8 @@ 
  */
 function sandbox_filtrer_squelette($skel, $corps, $filtres) {
 	$series_filtres = func_get_args();
-	array_shift($series_filtres);// skel
-	array_shift($series_filtres);// corps
+	array_shift($series_filtres); // skel
+	array_shift($series_filtres); // corps
 
 	// proteger les <INCLUDE> et tous les morceaux de php licites
 	if ($skel['process_ins'] == 'php') {
@@ -219,7 +219,7 @@ 
 	if (is_array($r)) {
 		$dst[] = $r[0];
 
-		return $src[] = '___' . md5($r[0]) . '___';
+		return $src[] = '___'.md5($r[0]).'___';
 	}
 
 	// si on recoit pas un tableau, on renvoit les couples de substitution

ecrire/public/format_html.php

Spacing +14 added lines, -14 removed lines

@@ -31,36 +31,36 @@ 
 
 function format_inclure_html($file, $args, $prof) {
 	if (strpos($file, '#') === false) {
-		$t = $file ? ('(' . $file . ')') : '';
+		$t = $file ? ('('.$file.')') : '';
 	} else {
-		$t = '{fond=' . $file . '}';
+		$t = '{fond='.$file.'}';
 	}
-	$args = !$args ? '' : ('{' . join(', ', $args) . '}');
+	$args = !$args ? '' : ('{'.join(', ', $args).'}');
 
-	return ('<INCLURE' . $t . $args . '>');
+	return ('<INCLURE'.$t.$args.'>');
 }
 
 function format_polyglotte_html($args, $prof) {
 	$contenu = [];
 	foreach ($args as $l => $t) {
-		$contenu[] = ($l ? "[$l]" : '') . $t;
+		$contenu[] = ($l ? "[$l]" : '').$t;
 	}
 
-	return ('<multi>' . join(' ', $contenu) . '</multi>');
+	return ('<multi>'.join(' ', $contenu).'</multi>');
 }
 
 function format_idiome_html($nom, $module, $args, $filtres, $prof) {
 	foreach ($args as $k => $v) {
 		$args[$k] = "$k=$v";
 	}
-	$args = (!$args ? '' : ('{' . join(',', $args) . '}'));
+	$args = (!$args ? '' : ('{'.join(',', $args).'}'));
 
-	return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
+	return ('<:'.($module ? "$module:" : '').$nom.$args.$filtres.':>');
 }
 
 function format_champ_html($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof) {
 	$nom = '#'
-		. ($boucle ? ($boucle . ':') : '')
+		. ($boucle ? ($boucle.':') : '')
 		. $nom
 		. $etoile
 		. $args
@@ -90,12 +90,12 @@ 
 		$critere[$k] = $crit_s;
 	}
 
-	return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
+	return (!$critere ? '' : ('{'.join(',', $critere).'}'));
 }
 
 function format_liste_html($fonc, $args, $prof) {
 	return ((($fonc !== '') ? "|$fonc" : $fonc)
-		. (!$args ? '' : ('{' . join(',', $args) . '}')));
+		. (!$args ? '' : ('{'.join(',', $args).'}')));
 }
 
 // Concatenation sans separateur: verifier qu'on ne cree pas de faux lexemes
@@ -111,7 +111,7 @@ 
 			// si un texte se termine par ( et est suivi d'un champ
 			// ou assimiles, forcer la notation pleine
 			if ($c1 == '(' and substr($texte2, 0, 1) == '#') {
-				$args[$i + 1][0] = '[(' . $texte2 . ')]';
+				$args[$i + 1][0] = '[('.$texte2.')]';
 			}
 		} else {
 			if ($type == 'texte') {
@@ -124,12 +124,12 @@ 
 				($c1 == '}' and substr(ltrim($texte2), 0, 1) == '|')
 				or (preg_match('/[\w\d_*]/', $c1) and preg_match('/^[\w\d_*{|]/', $texte2))
 			) {
-				$args[$i][0] = '[(' . $texte . ')]';
+				$args[$i][0] = '[('.$texte.')]';
 			}
 		}
 	}
 
-	return join('', array_map(function ($arg) {
+	return join('', array_map(function($arg) {
  return reset($arg);
 	}, $args));
 }

ecrire/public/styliser_par_z.php

Spacing +18 added lines, -18 removed lines

@@ -53,7 +53,7 @@ 
 			$apl_constant = '_Z_AJAX_PARALLEL_LOAD';
 			$page = _SPIP_PAGE;
 			$echafauder = charger_fonction('echafauder', 'public', true);
-			define('_ZCORE_EXCLURE_PATH', '\bprive|\bsquelettes-dist' . (defined('_DIR_PLUGIN_DIST') ? '|\b' . rtrim(
+			define('_ZCORE_EXCLURE_PATH', '\bprive|\bsquelettes-dist'.(defined('_DIR_PLUGIN_DIST') ? '|\b'.rtrim(
 				_DIR_PLUGIN_DIST,
 				'/'
 			) : ''));
@@ -77,7 +77,7 @@ 
 			and in_array($dir, $z_blocs) // verifier deja qu'on est dans un bloc Z
 			and defined($apl_constant)
 			and in_array($dir, explode(',', constant($apl_constant))) // et dans un demande en APL
-			and $pipe = z_trouver_bloc($prefix_path . $prepend, $dir, 'z_apl', $ext) // et qui contient le squelette APL
+			and $pipe = z_trouver_bloc($prefix_path.$prepend, $dir, 'z_apl', $ext) // et qui contient le squelette APL
 		) {
 			$flux['data'] = $pipe;
 
@@ -90,7 +90,7 @@ 
 			$echafauder = '';
 		}
 		if ($prepend) {
-			$squelette = substr(find_in_path($prefix_path . $prepend . "$fond.$ext"), 0, -strlen(".$ext"));
+			$squelette = substr(find_in_path($prefix_path.$prepend."$fond.$ext"), 0, -strlen(".$ext"));
 			if ($squelette) {
 				$flux['data'] = $squelette;
 			}
@@ -113,11 +113,11 @@ 
 				// se brancher sur contenu/xx si il existe
 				// ou si c'est un objet spip, associe a une table, utiliser le fond homonyme
 				if (!isset($disponible[$fond])) {
-					$disponible[$fond] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $fond, $ext, $echafauder);
+					$disponible[$fond] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $fond, $ext, $echafauder);
 				}
 
 				if ($disponible[$fond]) {
-					$flux['data'] = substr(find_in_path($prefix_path . "page.$ext"), 0, -strlen(".$ext"));
+					$flux['data'] = substr(find_in_path($prefix_path."page.$ext"), 0, -strlen(".$ext"));
 				}
 			}
 
@@ -130,7 +130,7 @@ 
 					$type = $flux['args']['contexte'][$page];
 				}
 				if (!isset($disponible[$type])) {
-					$disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
+					$disponible[$type] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $type, $ext, $echafauder);
 				}
 				if (is_string($disponible[$type])) {
 					$flux['data'] = $disponible[$type];
@@ -145,7 +145,7 @@ 
 					$flux['data'] = $echafauder($type, $is[0], $is[1], $is[2], $ext);
 				} else {
 					$flux['data'] = ($disponible['404'] = z_contenu_disponible(
-						$prefix_path . $prepend,
+						$prefix_path.$prepend,
 						$z_contenu,
 						'404',
 						$ext,
@@ -169,10 +169,10 @@ 
 						$type = $flux['args']['contexte'][$page];
 					}
 					if ($type !== 'page' and !isset($disponible[$type])) {
-						$disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
+						$disponible[$type] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $type, $ext, $echafauder);
 					}
 					if ($type == 'page' or $disponible[$type]) {
-						$flux['data'] = z_trouver_bloc($prefix_path . $prepend, $dir, 'dist', $ext);
+						$flux['data'] = z_trouver_bloc($prefix_path.$prepend, $dir, 'dist', $ext);
 					}
 				}
 			}
@@ -188,9 +188,9 @@ 
 				isset($flux['args']['contexte']['type-page'])
 				and (
 					(isset($flux['args']['contexte']['composition'])
-						and file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page'] . '-' . $flux['args']['contexte']['composition']) . ".$ext"))
+						and file_exists(($f = $squelette.'-'.$flux['args']['contexte']['type-page'].'-'.$flux['args']['contexte']['composition']).".$ext"))
 					or
-					file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page']) . ".$ext")
+					file_exists(($f = $squelette.'-'.$flux['args']['contexte']['type-page']).".$ext")
 				)
 			) {
 				$flux['data'] = $f;
@@ -198,7 +198,7 @@ 
 		} elseif (
 			$fond == 'structure'
 			and z_sanitize_var_zajax()
-			and $f = find_in_path($prefix_path . $prepend . 'ajax' . ".$ext")
+			and $f = find_in_path($prefix_path.$prepend.'ajax'.".$ext")
 		) {
 			$flux['data'] = substr($f, 0, -strlen(".$ext"));
 		} // chercher le fond correspondant a la composition
@@ -209,7 +209,7 @@ 
 			and $dir = explode('/', $dir)
 			and $dir = reset($dir)
 			and in_array($dir, $z_blocs)
-			and $f = find_in_path($prefix_path . $prepend . $fond . '-' . $flux['args']['contexte']['composition'] . ".$ext")
+			and $f = find_in_path($prefix_path.$prepend.$fond.'-'.$flux['args']['contexte']['composition'].".$ext")
 		) {
 			$flux['data'] = substr($f, 0, -strlen(".$ext"));
 		}
@@ -271,7 +271,7 @@ 
 function z_fond_valide($squelette) {
 	if (
 		!_ZCORE_EXCLURE_PATH
-		or !preg_match(',(' . _ZCORE_EXCLURE_PATH . ')/,', $squelette)
+		or !preg_match(',('._ZCORE_EXCLURE_PATH.')/,', $squelette)
 	) {
 		return true;
 	}
@@ -395,23 +395,23 @@ 
 		}
 		$dir = z_blocs(test_espace_prive());
 		$dir = reset($dir);
-		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/" . $fond . ',objet=' . $type . ',id_objet=#' . strtoupper($primary) . ',env}>';
+		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/".$fond.',objet='.$type.',id_objet=#'.strtoupper($primary).',env}>';
 	} // page objets
 	elseif ($type = $desc_exec and strpos($type, '/') === false) {
 		$dir = z_blocs(test_espace_prive());
 		$dir = reset($dir);
-		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/objets,objet=" . $type . ',env} />';
+		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/objets,objet=".$type.',env} />';
 	}
 	// morceau d'objet : on fournit le fond de sibstitution dans $desc_exec
 	// et objet et tire de $table
 	elseif ($fond = $desc_exec) {
 		$dir = md5(dirname($fond));
-		$scaffold = "<INCLURE{fond=$fond,objet=" . objet_type($table) . ',env} />';
+		$scaffold = "<INCLURE{fond=$fond,objet=".objet_type($table).',env} />';
 	}
 
 	$base_dir = sous_repertoire(_DIR_CACHE, 'scaffold', false);
 	$base_dir = sous_repertoire($base_dir, $dir, false);
-	$f = $base_dir . "$exec";
+	$f = $base_dir."$exec";
 	ecrire_fichier("$f.$ext", $scaffold);
 
 	return $f;

ecrire/public/evaluer_page.php

Spacing +9 added lines, -9 removed lines

@@ -44,11 +44,11 @@ 
 	}
 	ob_start();
 	if (strpos($page['texte'], '?xml') !== false) {
-		$page['texte'] = str_replace('<' . '?xml', "<\1?xml", $page['texte']);
+		$page['texte'] = str_replace('<'.'?xml', "<\1?xml", $page['texte']);
 	}
 
 	try {
-		$res = eval('?' . '>' . $page['texte']);
+		$res = eval('?'.'>'.$page['texte']);
 		// error catching 5.2<=PHP<7
 		if (
 			$res === false
@@ -60,12 +60,12 @@ 
 			if (!function_exists('numerote_ligne_php')) {
 				function numerote_ligne_php($match) {
 					$GLOBALS['numero_ligne_php']++;
-					return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
+					return "\n/*".str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT).'*/';
 				}
 			}
-			$code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', $code);
+			$code = '/*001*/'.preg_replace_callback(",\n,", 'numerote_ligne_php', $code);
 			$code = trim(highlight_string($code, true));
-			erreur_squelette('L' . $erreur['line'] . ': ' . $erreur['message'] . '<br />' . $code, [$page['source'],'',$erreur['file'],'',$GLOBALS['spip_lang']]);
+			erreur_squelette('L'.$erreur['line'].': '.$erreur['message'].'<br />'.$code, [$page['source'], '', $erreur['file'], '', $GLOBALS['spip_lang']]);
 			$page['texte'] = '<!-- Erreur -->';
 		}
 		else {
@@ -78,12 +78,12 @@ 
 		if (!function_exists('numerote_ligne_php')) {
 			function numerote_ligne_php($match) {
 				$GLOBALS['numero_ligne_php']++;
-				return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
+				return "\n/*".str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT).'*/';
 			}
 		}
-		$code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', $code);
+		$code = '/*001*/'.preg_replace_callback(",\n,", 'numerote_ligne_php', $code);
 		$code = trim(highlight_string($code, true));
-		erreur_squelette('L' . $e->getLine() . ': ' . $e->getMessage() . '<br />' . $code, [$page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']]);
+		erreur_squelette('L'.$e->getLine().': '.$e->getMessage().'<br />'.$code, [$page['source'], '', $e->getFile(), '', $GLOBALS['spip_lang']]);
 		$page['texte'] = '<!-- Erreur -->';
 	}
 	ob_end_clean();
@@ -91,7 +91,7 @@ 
 	$page['process_ins'] = 'html';
 
 	if (strpos($page['texte'], '?xml') !== false) {
-		$page['texte'] = str_replace("<\1?xml", '<' . '?xml', $page['texte']);
+		$page['texte'] = str_replace("<\1?xml", '<'.'?xml', $page['texte']);
 	}
 }
 

ecrire/public/balises.php

Spacing +51 added lines, -51 removed lines

@@ -364,7 +364,7 @@ 
  */
 function balise_DOSSIER_SQUELETTE_dist($p) {
 	$code = substr(addslashes(dirname($p->descr['sourcefile'])), strlen(_DIR_RACINE));
-	$p->code = "_DIR_RACINE . '$code'" .
+	$p->code = "_DIR_RACINE . '$code'".
 		$p->interdire_scripts = false;
 
 	return $p;
@@ -383,7 +383,7 @@ 
  */
 function balise_SQUELETTE_dist($p) {
 	$code = addslashes($p->descr['sourcefile']);
-	$p->code = "'$code'" .
+	$p->code = "'$code'".
 		$p->interdire_scripts = false;
 
 	return $p;
@@ -435,9 +435,9 @@ 
  **/
 function balise_NOM_SITE_dist($p) {
 	if (!$p->etoile) {
-		$p->code = 'supprimer_numero(calculer_url(' .
-			champ_sql('url_site', $p) . ',' .
-			champ_sql('nom_site', $p) .
+		$p->code = 'supprimer_numero(calculer_url('.
+			champ_sql('url_site', $p).','.
+			champ_sql('nom_site', $p).
 			", 'titre', \$connect, false))";
 	} else {
 		$p->code = champ_sql('nom_site', $p);
@@ -588,8 +588,8 @@ 
  *     Pile complétée par le code à générer
  **/
 function balise_POPULARITE_ABSOLUE_dist($p) {
-	$p->code = 'ceil(' .
-		champ_sql('popularite', $p) .
+	$p->code = 'ceil('.
+		champ_sql('popularite', $p).
 		')';
 	$p->interdire_scripts = false;
 
@@ -670,7 +670,7 @@ 
 	$p->code = index_pile($p->id_boucle, 'valeur', $p->boucles, $b);
 ;
 	if (($v = interprete_argument_balise(1, $p)) !== null) {
-		$p->code = 'table_valeur(' . $p->code . ', ' . $v . ')';
+		$p->code = 'table_valeur('.$p->code.', '.$v.')';
 	}
 	$p->interdire_scripts = true;
 
@@ -809,16 +809,16 @@ 
 	$trouver_table = charger_fonction('trouver_table', 'base');
 	if ($desc = $trouver_table(table_objet_sql($type_objet))) {
 		if (isset($desc['field']['descriptif'])) {
-			$_ligne .= "'descriptif' => " . champ_sql('descriptif', $p) . ',';
+			$_ligne .= "'descriptif' => ".champ_sql('descriptif', $p).',';
 		}
 		if (isset($desc['field']['texte'])) {
-			$_ligne .= "'texte' => " . champ_sql('texte', $p) . ',';
+			$_ligne .= "'texte' => ".champ_sql('texte', $p).',';
 		}
 		if (isset($desc['field']['chapo'])) {
-			$_ligne .= "'chapo' => " . champ_sql('chapo', $p) . ',';
+			$_ligne .= "'chapo' => ".champ_sql('chapo', $p).',';
 		}
 		if (isset($desc['introduction_longueur'])) {
-			$_introduction_longueur = "'" . $desc['introduction_longueur'] . "'";
+			$_introduction_longueur = "'".$desc['introduction_longueur']."'";
 		}
 	}
 	$_ligne .= ')';
@@ -917,10 +917,10 @@ 
 		$p->code = sprintf(
 			CODE_RECUPERER_FOND,
 			"'modeles/lesauteurs'",
-			"array('objet'=>'" . $objet .
-			"','id_objet' => " . champ_sql($id_table_objet, $p) .
-			",'$id_table_objet' => " . champ_sql($id_table_objet, $p) .
-			($objet == 'article' ? '' : ",'id_article' => " . champ_sql('id_article', $p)) .
+			"array('objet'=>'".$objet.
+			"','id_objet' => ".champ_sql($id_table_objet, $p).
+			",'$id_table_objet' => ".champ_sql($id_table_objet, $p).
+			($objet == 'article' ? '' : ",'id_article' => ".champ_sql('id_article', $p)).
 			')',
 			"'trim'=>true, 'compil'=>array($c)",
 			_q($connect)
@@ -989,7 +989,7 @@ 
 					$m = trim($m);
 					if ($m != "''") {
 						if (!preg_match(',\W,', $m)) {
-							$m = $boucle->id_table . ".$m";
+							$m = $boucle->id_table.".$m";
 						}
 
 						$m .= ' AS titre_rang';
@@ -1150,7 +1150,7 @@ 
 	$f_pagination = chercher_filtre('pagination');
 	$type = $p->boucles[$b]->modificateur['debut_nom'];
 	$modif = ($type[0] !== "'") ? "'debut'.$type"
-		: ("'debut" . substr($type, 1));
+		: ("'debut".substr($type, 1));
 
 	$p->code = sprintf(
 		CODE_PAGINATION,
@@ -1294,7 +1294,7 @@ 
 		$msg = ['zbug_balise_sans_argument', ['balise' => ' CHEMIN']];
 		erreur_squelette($msg, $p);
 	} else {
-		$p->code = 'find_in_path(' . $arg . ')';
+		$p->code = 'find_in_path('.$arg.')';
 	}
 
 	$p->interdire_scripts = false;
@@ -1329,7 +1329,7 @@ 
 		$msg = ['zbug_balise_sans_argument', ['balise' => ' CHEMIN_IMAGE']];
 		erreur_squelette($msg, $p);
 	} else {
-		$p->code = 'chemin_image(' . $arg . ')';
+		$p->code = 'chemin_image('.$arg.')';
 	}
 
 	$p->interdire_scripts = false;
@@ -1383,7 +1383,7 @@ 
 		// cas de #ENV sans argument : on retourne le serialize() du tableau
 		// une belle fonction [(#ENV|affiche_env)] serait pratique
 		if ($src) {
-			$p->code = '(is_array($a = (' . $src . ')) ? serialize($a) : "")';
+			$p->code = '(is_array($a = ('.$src.')) ? serialize($a) : "")';
 		} else {
 			$p->code = 'serialize($Pile[0]??[])';
 		}
@@ -1436,8 +1436,8 @@ 
 	$_sinon = interprete_argument_balise(2, $p);
 	$_unserialize = sinon(interprete_argument_balise(3, $p), 'false');
 
-	$p->code = '(include_spip(\'inc/config\')?lire_config(' . $arg . ',' .
-		($_sinon && $_sinon != "''" ? $_sinon : 'null') . ',' . $_unserialize . "):'')";
+	$p->code = '(include_spip(\'inc/config\')?lire_config('.$arg.','.
+		($_sinon && $_sinon != "''" ? $_sinon : 'null').','.$_unserialize."):'')";
 
 	return $p;
 }
@@ -1530,7 +1530,7 @@ 
 		$err_b_s_a = ['zbug_balise_sans_argument', ['balise' => 'SESSION_SET']];
 		erreur_squelette($err_b_s_a, $p);
 	} else {
-		$p->code = '(include_spip("inc/session") AND session_set(' . $_nom . ',' . $_val . '))';
+		$p->code = '(include_spip("inc/session") AND session_set('.$_nom.','.$_val.'))';
 	}
 
 	$p->interdire_scripts = false;
@@ -1578,7 +1578,7 @@ 
 			)
 		) {
 			$p->code = /* $r[1]. */
-				'(' . $r[2] . ')';
+				'('.$r[2].')';
 		} else {
 			$p->code = "eval('return '.$php.';')";
 		}
@@ -1822,9 +1822,9 @@ 
 
 		// noter la duree du cache dans un entete proprietaire
 
-		$code = "'<'.'" . '?php header("X-Spip-Cache: '
+		$code = "'<'.'".'?php header("X-Spip-Cache: '
 			. $duree
-			. '"); ?' . "'.'>'";
+			. '"); ?'."'.'>'";
 
 		// Remplir le header Cache-Control
 		// cas #CACHE{0}
@@ -1845,9 +1845,9 @@ 
 				$pa == 'cache-client'
 				and $duree > 0
 			) {
-				$code .= ".'<'.'" . '?php header("Cache-Control: max-age='
+				$code .= ".'<'.'".'?php header("Cache-Control: max-age='
 					. $duree
-					. '"); ?' . "'.'>'";
+					. '"); ?'."'.'>'";
 				// il semble logique, si on cache-client, de ne pas invalider
 				$pa = 'statique';
 			}
@@ -1856,7 +1856,7 @@ 
 				$pa == 'statique'
 				and $duree > 0
 			) {
-				$code .= ".'<'.'" . '?php header("X-Spip-Statique: oui"); ?' . "'.'>'";
+				$code .= ".'<'.'".'?php header("X-Spip-Statique: oui"); ?'."'.'>'";
 			}
 		}
 	} else {
@@ -2020,9 +2020,9 @@ 
 		if ($p->etoile) {
 			$_options[] = "'etoile'=>true";
 		}
-		$_options[] = "'compil'=>array(" . memoriser_contexte_compil($p) . ')';
+		$_options[] = "'compil'=>array(".memoriser_contexte_compil($p).')';
 
-		$_l = 'array(' . join(",\n\t", $_contexte) . ')';
+		$_l = 'array('.join(",\n\t", $_contexte).')';
 		if ($flag_env) {
 			$_l = "array_merge(\$Pile[0],$_l)";
 		}
@@ -2032,7 +2032,7 @@ 
 		$msg = ['zbug_balise_sans_argument', ['balise' => ' INCLURE']];
 		erreur_squelette($msg, $p);
 	} else {
-		$p->code = 'charge_scripts(' . $_contexte[1] . ',false)';
+		$p->code = 'charge_scripts('.$_contexte[1].',false)';
 	}
 
 	$p->interdire_scripts = false; // la securite est assuree par recuperer_fond
@@ -2080,7 +2080,7 @@ 
 		unset($_contexte[1]);
 
 		if (preg_match("/^\s*'[^']*'/s", $nom)) {
-			$nom = "'modeles/" . substr($nom, 1);
+			$nom = "'modeles/".substr($nom, 1);
 		} else {
 			$nom = "'modeles/' . $nom";
 		}
@@ -2097,8 +2097,8 @@ 
 			$primary = $p->boucles[$p->id_boucle]->primary;
 			if (!strpos($primary, ',')) {
 				$id = champ_sql($primary, $p);
-				$_contexte[] = "'$primary'=>" . $id;
-				$_contexte[] = "'id'=>" . $id;
+				$_contexte[] = "'$primary'=>".$id;
+				$_contexte[] = "'id'=>".$id;
 			}
 		}
 		$_contexte[] = "'recurs'=>(++\$recurs)";
@@ -2110,11 +2110,11 @@ 
 		$_options = memoriser_contexte_compil($p);
 		$_options = "'compil'=>array($_options), 'trim'=>true";
 		if (isset($_contexte['ajax'])) {
-			$_options .= ', ' . preg_replace(',=>(.*)$,ims', '=> ($v=(\\1))?$v:true', $_contexte['ajax']);
+			$_options .= ', '.preg_replace(',=>(.*)$,ims', '=> ($v=(\\1))?$v:true', $_contexte['ajax']);
 			unset($_contexte['ajax']);
 		}
 
-		$_l = 'array(' . join(",\n\t", $_contexte) . ')';
+		$_l = 'array('.join(",\n\t", $_contexte).')';
 		if ($flag_env) {
 			$_l = "array_merge(\$Pile[0],$_l)";
 		}
@@ -2224,12 +2224,12 @@ 
 function balise_DOUBLONS_dist($p) {
 	if ($type = interprete_argument_balise(1, $p)) {
 		if ($famille = interprete_argument_balise(2, $p)) {
-			$type .= '.' . $famille;
+			$type .= '.'.$famille;
 		}
-		$p->code = '(isset($doublons[' . $type . ']) ? $doublons[' . $type . '] : "")';
+		$p->code = '(isset($doublons['.$type.']) ? $doublons['.$type.'] : "")';
 		if (!$p->etoile) {
 			$p->code = 'array_filter(array_map("intval",explode(",",'
-				. $p->code . ')))';
+				. $p->code.')))';
 		}
 	} else {
 		$p->code = '$doublons';
@@ -2358,7 +2358,7 @@ 
 			$_code[] = "$_key => $_val";
 		}
 	} while ($_key && $_val);
-	$p->code = 'array(' . join(', ', $_code) . ')';
+	$p->code = 'array('.join(', ', $_code).')';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -2385,7 +2385,7 @@ 
 	while ($_val = interprete_argument_balise($n++, $p)) {
 		$_code[] = $_val;
 	}
-	$p->code = 'array(' . join(', ', $_code) . ')';
+	$p->code = 'array('.join(', ', $_code).')';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -2430,10 +2430,10 @@ 
 		$_code[] = $_v;
 	}
 
-	$p->code = '((function_exists("autoriser")||include_spip("inc/autoriser"))&&autoriser(' . join(
+	$p->code = '((function_exists("autoriser")||include_spip("inc/autoriser"))&&autoriser('.join(
 		', ',
 		$_code
-	) . ')?" ":"")';
+	).')?" ":"")';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -2466,7 +2466,7 @@ 
 	$type_info = isset($type_info) ? str_replace('\'', '"', $type_info) : '"est_actif"';
 
 	$f = chercher_filtre('info_plugin');
-	$p->code = $f . '(' . $plugin . ', ' . $type_info . ')';
+	$p->code = $f.'('.$plugin.', '.$type_info.')';
 
 	return $p;
 }
@@ -2716,12 +2716,12 @@ 
 	$_issens = "in_array($_champ,array('>','<'))";
 	$_sens = "(strpos('< >',$_champ)-1)";
 
-	$_variable = "((\$s=$_issens)?'sens':'tri')." . $boucle->modificateur['tri_nom'];
+	$_variable = "((\$s=$_issens)?'sens':'tri').".$boucle->modificateur['tri_nom'];
 	$_url = "parametre_url(self(),$_variable,\$s?$_sens:$_champ)";
-	$_url = "parametre_url($_url,'var_memotri',strncmp(" . $boucle->modificateur['tri_nom'] . ",'session',7)==0?$_variable:'')";
-	$_on = '$s?(' . $boucle->modificateur['tri_sens'] . "==$_sens" . '):(' . $boucle->modificateur['tri_champ'] . "==$_champ)";
+	$_url = "parametre_url($_url,'var_memotri',strncmp(".$boucle->modificateur['tri_nom'].",'session',7)==0?$_variable:'')";
+	$_on = '$s?('.$boucle->modificateur['tri_sens']."==$_sens".'):('.$boucle->modificateur['tri_champ']."==$_champ)";
 
-	$p->code = "lien_ou_expose($_url,$_libelle,$_on" . ($_class ? ",$_class" : '') . ')';
+	$p->code = "lien_ou_expose($_url,$_libelle,$_on".($_class ? ",$_class" : '').')';
 	//$p->code = "''";
 	$p->interdire_scripts = false;
 
@@ -2795,7 +2795,7 @@ 
 		$connect = $p->boucles[$p->id_boucle]->sql_serveur;
 	}
 
-	$p->code = '(objet_test_si_publie(' . $_type . ',intval(' . $_id . '),' . _q($connect) . ")?' ':'')";
+	$p->code = '(objet_test_si_publie('.$_type.',intval('.$_id.'),'._q($connect).")?' ':'')";
 	$p->interdire_scripts = false;
 
 	return $p;