- eviter une double insertion des directives head si #INSERT_HEAD est present...

- eviter une double insertion des directives head si #INSERT_HEAD est present deux fois dans un meme squelette
- suppleer la balise #INSERT_HEAD si absente, lors de l'affichage final (moins rapide dans ce cas, desactivable par $GLOBALS['desactiver_insert_head_defaut']=true; pour les bricoleurs
- detecter une double #INSERT_HEAD lorsqu'on est admin (cela pouvant encore arriver si la balise est dans 2 squelettes differents :( )
Un vidage de cache est indispensable !!!

ecrire/inc_version.php

@@ -226,7 +226,7 @@ $controler_dates_rss = true;
 # lorsqu'il est rencontre
 // http://doc.spip.org/@Tuto-Se-servir-des-points-d-entree
 $spip_pipeline = array(
-	'affichage_final' => '|f_surligne|f_tidy|f_admin', # cf. public/assembler
+	'affichage_final' => '|f_insert_head_defaut|f_surligne|f_tidy|f_admin', # cf. public/assembler
 	'affiche_droite' => '',
 	'affiche_gauche' => '',
 	'affiche_milieu' => '',
@@ -235,7 +235,7 @@ $spip_pipeline = array(
 	'body_prive' => '',
 	'exec_init' => '',
 	'header_prive' => '|f_jQuery',
-	'insert_head' => '|f_jQuery',
+	'insert_head' => '|f_jQuery|f_insert_head',
 	'nettoyer_raccourcis_typo' => '',
 	'pre_propre' => '|extraire_multi',
 	'post_propre' => '',

ecrire/public/assembler.php

@@ -327,6 +327,27 @@ function f_tidy ($texte) {
 	return $texte;
 }
 
+// Inserer les css et js meme si #INSERT_HEAD n'est pas dans le squelette
+function f_insert_head($texte){
+	return "<!--insert_head-->".$texte;
+}
+
+function f_insert_head_defaut($texte){
+	if ($GLOBALS['desactiver_insert_head_defaut']==true) return $texte;
+	if (($p = strpos($texte,"<!--insert_head-->"))!==FALSE){
+		if ($GLOBALS['auteur_session']['statut']!='0minirezo') return $texte;
+		if (strpos($texte,"<!--insert_head-->",$p+18)!==FALSE){
+			include_spip('public/debug');
+			$texte = affiche_erreurs_page(array(array("#INSERT_HEAD",_L("Double occurence")))) . $texte;
+		}
+		return $texte;
+	}
+	if (!preg_match(",<head[^>]*>,Uis",$texte,$regs)) return $texte;
+	$insert = "\n".pipeline('insert_head','')."\n";
+	$texte = str_replace($regs[0],$regs[0].$insert,$texte);
+	return $texte;
+}
+
 // Inserer au besoin les boutons admins
 // http://doc.spip.org/@f_admin
 function f_admin ($texte) {

ecrire/public/balises.php

@@ -1159,7 +1159,7 @@ function balise_CACHE_dist($p) {
 //
 // http://doc.spip.org/@balise_INSERT_HEAD_dist
 function balise_INSERT_HEAD_dist($p) {
-	$p->code = "pipeline('insert_head','')";
+	$p->code = "(isset(\$Pile['flags']['insert_head'])?'':(pipeline('insert_head','') . vide(\$Pile['flags']['insert_head']=1)))";
 	$p->interdire_scripts = false;
 	return $p;
 }