--- /dev/null
+[(#SET{titre,[(#ENV{titre_liste}|=={titre_perso}|?{[(#ENV**{titre_liste_perso}|typo)],[(#ENV{titre_liste}|_T)]})]})]\r
+<div id="calendar">\r
+ [(#ENV{afficher_titre_liste}|oui)[<h2 class="h2">(#GET{titre})</h2>]]\r
+ <table summary="<:icone_calendrier:>">\r
+ <caption>[\r
+ <a\r
+ href="(#ENV{self}|parametre_url{date,[(#ENV{date}|Agenda_moisdecal{-1,'Y-m'})]})"\r
+ title="[(#ENV{date}|Agenda_moisdecal{-1,'Y-m'}|affdate_mois_annee)]"\r
+ class="ajax"\r
+ >«</a>][\r
+ (#ENV{#ENV{var_date},#ENV{date}}|affdate_mois_annee)][\r
+ <a\r
+ href="(#ENV{self}|parametre_url{date,[(#ENV{date}|Agenda_moisdecal{1,'Y-m'})]})"\r
+ title="[(#ENV{date}|Agenda_moisdecal{1,'Y-m'}|affdate_mois_annee)]"\r
+ class="ajax"\r
+ >»</a>]\r
+ </caption>\r
+ <thead>\r
+ <tr>\r
+ <th scope="col"><abbr title="<:date_jour_2:>"><:date_jour_2|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_3:>"><:date_jour_3|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_4:>"><:date_jour_4|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_5:>"><:date_jour_5|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_6:>"><:date_jour_6|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_7:>"><:date_jour_7|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ <th scope="col"><abbr title="<:date_jour_1:>"><:date_jour_1|spip_substr{0,1}|strtoupper:></abbr></th>\r
+ </tr>\r
+ </thead>\r
+ <tbody>\r
+ [(#REM)\r
+ Simplification: On commence par calculer les evenements qui:\r
+ (1) commencent avant le debut du mois suivant le mois demande (borne_fin_mois est en fait le 1er jour du mois suivant)\r
+ ET\r
+ (2) finissent apres le debut du mois demande (1er jour inclus)\r
+ Sont donc inclus:\r
+ (a) les evenements qui commencent dans le mois demande (test 1)\r
+ et dont la fin est necessairement apres le debut du mois demande (test 2 vrai aussi)\r
+ (b) les evenements qui finissent dans le mois demande (test 2)\r
+ et dont le debut est necessairement avant la fin du mois demande (test 1 vrai aussi)\r
+ (c) les evenements qui commencent avant le mois demande (test 1) ET finissent apres le mois demande (test 2)\r
+ Plus simple depuis qu'on dispose du calcul des bornes de debut et fin de mois... et plus de doublons :-)\r
+ Correction: on tronque le jour de la date pour bien partir du debut de mois quelle que soit la date demandee:\r
+ 2009-12-15 donne quand meme borne_debut_mois==2009-12-01 et borne_fin_mois==2010-01-01\r
+ au lieu de borne_debut_mois==2009-12-15 et borne_fin_mois==2010-01-15\r
+ ]\r
+ #SET{'borne_debut_mois', (#ENV{date}|affdate{'Y-m'}|Agenda_moisdecal{0,'Y-m-d'})}\r
+ #SET{'borne_fin_mois', (#ENV{date}|affdate{'Y-m'}|Agenda_moisdecal{1,'Y-m-d'})}\r
+ <!-- le debut de mois est #GET{'borne_debut_mois'}, le debut du suivant est #GET{'borne_fin_mois'} -->\r
+ <BOUCLE_calendrier(EVENEMENTS)\r
+ {aveline_branche}{aveline_exclure_objet_encours}\r
+ {date_debut < #GET{'borne_fin_mois'}} \r
+ {date_fin >= #GET{'borne_debut_mois'}}>[\r
+ (#DATE_DEBUT|Agenda_memo_full{#DATE_FIN,[(#TITRE|addslashes)],\r
+ #DESCRIPTIF,#LIEU,\r
+ #URL_EVENEMENT,'',''})\r
+ ]</BOUCLE_calendrier>\r
+ [(#REM) le "courante" ci-dessus peut etre remplace par "debut" pour retrouver l'ancien comportement]\r
+ \r
+ [(#REM) Puis on les affiche dans un agenda]\r
+ [(#ENV{date}|aveline_agenda_mini)]\r
+ \r
+ </tbody>\r
+ </table>\r
+ <span> </span>\r
+</div>
\ No newline at end of file