Donner la ligne fautive pour un mauvais paramètre d'inclusion. Et éviter que...

Donner la ligne fautive pour un mauvais paramètre d'inclusion. Et éviter que PHP émette un Parse Error dans la foulée.

ecrire/lang/spip_fr.php

@@ -768,7 +768,7 @@ et vous reconnecter au site.
 'zbug_info_erreur_squelette' => 'Erreur sur le site',
 'zbug_inversion_ordre_inexistant' => 'Inversion d\'un ordre inexistant',
 'zbug_pagination_sans_critere' => 'Balise #PAGINATION sans critère {pagination} ou employé dans une boucle recursive',
-'zbug_parametres_inclus_incorrects' => 'Paramètres d\'inclusion incorrects',
+'zbug_parametres_inclus_incorrects' => 'Paramètre d\'inclusion incorrect&nbsp: @param@',
 'zbug_profile' => 'Temps de calcul : @time@',
 'zbug_resultat' => 'résultat',
 'zbug_serveur_indefini' => 'Serveur SQL indéfini',

ecrire/public/compiler.php

@@ -60,9 +60,12 @@ function argumenter_inclure($params, $rejet_filtres, $p, &$boucles, $id_boucle,
 		foreach($couple as $n => $val) {
 			$var = $val[0];
 			if ($var->type != 'texte') {
-			  if ($n OR $k)
-				erreur_squelette(_T('zbug_parametres_inclus_incorrects'), $p);
-			  else $l[1] = calculer_liste($val, $p->descr, $boucles, $id_boucle);
+			  if ($n OR $k) {
+			    $msg = array('zbug_parametres_inclus_incorrects',
+					 array('param' => $var->nom_champ));
+			    erreur_squelette($msg, $p);
+			  } 
+			  $l[1] = calculer_liste($val, $p->descr, $boucles, $id_boucle);
 			  break;
 			} else {
 				preg_match(",^([^=]*)(=?)(.*)$,", $var->texte,$m);
@@ -114,6 +117,9 @@ function argumenter_inclure($params, $rejet_filtres, $p, &$boucles, $id_boucle,
 function calculer_inclure($p, &$boucles, $id_boucle) {
 
 	$_contexte = argumenter_inclure($p->param, false, $p, $boucles, $id_boucle);
+	// Eliminer le hack pour #INCLURE, 
+	// (s'il est la, c'est une erreur, mais ce n'est pas a  PHP de le dire)
+	if (isset($_contexte[1])) unset($_contexte[1]);
 	if (is_string($p->texte)) {
 		$fichier = $p->texte;
 		$code = "'$fichier'";