[on mémorise le mois/année actif (#REM)]
	[(#SET{mois_actif, [(#ENV{#ENV{var_date},#ENV{date}}|affdate{'Y-m'})]} )]
	
	[on remplit le tableau avec les themes cochés (#REM)]
	#SET{theme-1, #EVAL{$_GET['theme-1']} }
	#SET{theme-2, #EVAL{$_GET['theme-2']} }
	#SET{theme-3, #EVAL{$_GET['theme-3']} }
	#SET{theme-4, #EVAL{$_GET['theme-4']} }
	#SET{theme-5, #EVAL{$_GET['theme-5']} }
	
	[un tableau pour stocker la liste des themes cochés (#REM)]
	#SET{themes, #ARRAY}
	[on remplit le tableau avec les themes cochés (#REM)]
	<BOUCLE_themes(MOTS){id_groupe=1}{par num titre}>
		[(#GET{theme-#ID_MOT}|=={'oui'}|?{#SET_PUSH{themes, #ID_MOT}})] 
	</BOUCLE_themes>
	
	[si le tableau est vide => aucun theme = tous (#REM)]
	[(#GET{themes}|table_valeur{0}|?{'',#SET{pas_theme,oui}})]	
	<BOUCLE_pas_theme(CONDITION){si #GET{pas_theme}|=={oui}}>	
		[un tableau est remplit de tous les themes (#REM)]
	   <BOUCLE_push_theme(MOTS){id_groupe=1}{par num titre}>
	   	#SET_PUSH{themes,#ID_MOT}
	   </BOUCLE_push_theme>
	</BOUCLE_pas_theme>

<div id="calendar"> 
	<table summary="<:icone_calendrier:>">
		
		<caption>[
			<a
				href="(#ENV{self}|parametre_url{theme-1,#GET{theme-1}}|parametre_url{theme-2,#GET{theme-2}}|parametre_url{theme-3,#GET{theme-3}}|parametre_url{theme-4,#GET{theme-4}}|parametre_url{theme-5,#GET{theme-5}}|parametre_url{recherche,#RECHERCHE}|parametre_url{#ENV{var_date},[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{-1,'Y-m'})]}|parametre_url{recherche,#RECHERCHE}|ancre_url{[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{-1,'Y-m'})]})"
				class="ajax" title="[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{-1,'Y-m'}|affdate_mois_annee)]"
			>&lt;&nbsp;</a>][
			(#ENV{#ENV{var_date},#ENV{date}}|affdate_mois_annee)][
			<a
				href="(#ENV{self}|parametre_url{theme-1,#GET{theme-1}}|parametre_url{theme-2,#GET{theme-2}}|parametre_url{theme-3,#GET{theme-3}}|parametre_url{theme-4,#GET{theme-4}}|parametre_url{theme-5,#GET{theme-5}}|parametre_url{#ENV{var_date},[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{1,'Y-m'})]}|parametre_url{recherche,#RECHERCHE}|ancre_url{[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{1,'Y-m'})]})"
				class="ajax" title="[(#ENV{#ENV{var_date},#ENV{date}}|Agenda_moisdecal{1,'Y-m'}|affdate_mois_annee)]"
			>&nbsp;&gt;</a>]
		</caption>
		<thead>
			<tr>
				<th scope="col"><abbr title="<:date_jour_2:>"><:date_jour_2|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_3:>"><:date_jour_3|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_4:>"><:date_jour_4|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_5:>"><:date_jour_5|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_6:>"><:date_jour_6|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_7:>"><:date_jour_7|spip_substr{0,1}|strtoupper:></abbr></th>
				<th scope="col"><abbr title="<:date_jour_1:>"><:date_jour_1|spip_substr{0,1}|strtoupper:></abbr></th>
			</tr>
		</thead>
		<tbody>
			[(#REM)
			Simplification: On commence par calculer les evenements qui:
					(1) commencent avant le debut du mois suivant le mois demande (borne_fin_mois est en fait le 1er jour du mois suivant)
						ET
					(2) finissent apres le debut du mois demande (1er jour inclus)
				Sont donc inclus:
					(a) les evenements qui commencent dans le mois demande (test 1)
						et dont la fin est necessairement apres le debut du mois demande (test 2 vrai aussi)
					(b) les evenements qui finissent dans le mois demande (test 2)
						et dont le debut est necessairement avant la fin du mois demande (test 1 vrai aussi)
					(c) les evenements qui commencent avant le mois demande (test 1) ET finissent apres le mois demande (test 2)
				Plus simple depuis qu'on dispose du calcul des bornes de debut et fin de mois... et plus de doublons :-)
			Correction: on tronque le jour de la date pour bien partir du debut de mois quelle que soit la date demandee:
					2009-12-15 donne quand meme borne_debut_mois==2009-12-01 et borne_fin_mois==2010-01-01
						au lieu de borne_debut_mois==2009-12-15 et borne_fin_mois==2010-01-15
			]
			#SET{'borne_debut_mois', (#ENV{#ENV{var_date},#ENV{date}}|affdate{'Y-m'}|Agenda_moisdecal{0,'Y-m-d'})}
			#SET{'borne_fin_mois', (#ENV{#ENV{var_date},#ENV{date}}|affdate{'Y-m'}|Agenda_moisdecal{1,'Y-m-d'})}
			<!-- le debut de mois est #GET{'borne_debut_mois'}, le debut du suivant est #GET{'borne_fin_mois'} -->
			
			[je retire le critere {id_article?} pour avoir les event du mois(#REM)]
			<BOUCLE_calendrier(EVENEMENTS)
			{id_mot?}
			{date_debut < #GET{'borne_fin_mois'}} 
			{date_fin >= #GET{'borne_debut_mois'}}>
			<BOUCLE_art_event(ARTICLES){id_article}{id_mot IN #GET{themes}}{recherche?}>
			[
			(#DATE_DEBUT|Agenda_memo_full{#DATE_FIN,[(#TITRE|addslashes)],
				#DESCRIPTIF,#LIEU,
				[(#ENV{self}
				|parametre_url{theme-1,#GET{theme-1}}|parametre_url{theme-2,#GET{theme-2}}|parametre_url{theme-3,#GET{theme-3}}|parametre_url{theme-4,#GET{theme-4}}|parametre_url{theme-5,#GET{theme-5}}|parametre_url{date,#GET{mois_actif}}|parametre_url{recherche,#RECHERCHE}|ancre_url{[(#DATE_FIN|affdate{'Y-m-d'})]}
				)]
				,'',})
				
			]
			</BOUCLE_art_event>
			
			</BOUCLE_calendrier>
			
			
			
			[(#REM) le "courante" ci-dessus peut etre remplace par "debut" pour retrouver l'ancien comportement]
			
			[(#REM) Puis on les affiche dans un agenda]
			[(#ENV{#ENV{var_date},#ENV{date}}|agenda_mini)]
			
		</tbody>
	</table>
	<span>&nbsp;</span>
</div>