change: le critere `par_odre_liste` retourne maintenant en premier les éléments de la liste.

Si la boucle retourne plus d’entrées que la liste transmise au critère `par_odre_liste`,
ces éléments seront retournés après ceux de la liste, que l’on souhaite toujours en premier.

Refs: #5273

CHANGELOG.md

@@ -12,6 +12,7 @@
 
 ### Changed
 
+- #5273 Le critère `par_ordre_liste` rejette à la fin les éléments de la boucle absents de la liste
 - #5016 Généralisation du traitement des balises dynamiques dans un modèle
 - #5272 Compatibilité avec PHP 8.2
 - #5025 Prise en charge de l'utf8 pour le filtre `|match` en appliquant par défaut le modificateur u (PCRE_UTF8)

ecrire/public/criteres.php

@@ -1107,6 +1107,7 @@ function critere_inverse_dist($idb, &$boucles, $crit) {
 
 /**
  * {par_ordre_liste champ,#LISTE{...}} pour trier selon une liste
+ * en retournant en premier les éléments de la liste
  * @param $idb
  * @param $boucles
  * @param $crit
@@ -1133,7 +1134,9 @@ function critere_par_ordre_liste_dist($idb, &$boucles, $crit) {
 	$_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";
+
+	$order = "'-FIELD(' . $_order . ',' . ((\$zl=formate_liste_critere_par_ordre_liste(array_reverse($_liste),'" . $boucle->sql_serveur . "')) ? \$zl : '0').')'$sens";
+	$boucle->order[] = $order;
 }