8,'descriptif'=>4,'lieu'=>3);
ecrire_meta('INDEX_elements_objet',serialize($INDEX_elements_objet));
ecrire_metas();
}
}
if (isset($GLOBALS['meta']['INDEX_objet_associes'])){
$INDEX_objet_associes = unserialize($GLOBALS['meta']['INDEX_objet_associes']);
if (!isset($INDEX_objet_associes['spip_articles']['spip_evenements'])){
$INDEX_objet_associes['spip_articles']['spip_evenements'] = 1;
ecrire_meta('INDEX_objet_associes',serialize($INDEX_objet_associes));
ecrire_metas();
}
}
if (isset($GLOBALS['meta']['INDEX_elements_associes'])){
$INDEX_elements_associes = unserialize($GLOBALS['meta']['INDEX_elements_associes']);
if (!isset($INDEX_elements_associes['spip_evenements'])){
$INDEX_elements_associes['spip_evenements'] = array('titre'=>2,'descriptif'=>1);
ecrire_meta('INDEX_elements_associes',serialize($INDEX_elements_associes));
ecrire_metas();
}
}
}
function article_editable($id_article){
$flag_editable = false;
global $connect_id_auteur, $id_secteur;
$id_parent = intval($id_parent);
if (!($id_article=intval($id_article)))
return false;
if ($row = spip_fetch_array(spip_query("SELECT statut, titre, id_rubrique FROM spip_articles WHERE id_article=".spip_abstract_quote($id_article)))) {
$statut_article = $row['statut'];
$titre_article = $row['titre'];
$id_rubrique = $row['id_rubrique'];
$statut_rubrique = acces_rubrique($id_rubrique);
if ($titre_article=='') $titre_article = _T('info_sans_titre');
}
else {
$statut_article = '';
$statut_rubrique = false;
$id_rubrique = '0';
if ($titre=='') $titre = _T('info_sans_titre');
}
$flag_auteur = spip_num_rows(spip_query("SELECT id_auteur FROM spip_auteurs_articles WHERE id_article=".spip_abstract_quote($id_article)." AND id_auteur=".spip_abstract_quote($connect_id_auteur)." LIMIT 1"));
$ok_nouveau_statut = false;
$flag_editable = ($statut_rubrique
OR ($flag_auteur
AND ($statut_article == 'prepa'
OR $statut_article == 'prop'
OR $statut_article == 'poubelle')));
return $flag_editable;
}
function Agenda_afficher_date_evenement($date_debut, $date_fin, $horaire){
$s = "";
if (($d=date("Y-m-d",$date_debut))==date("Y-m-d",$date_fin))
{ // meme jour
$s = affdate_jourcourt($d);
if ($horaire=='oui'){
$s .= " ".($hd=date("H:i",$date_debut));
if ($hd!=($hf=date("H:i",$date_fin)))
$s .= "-$hf";
}
}
else if ((date("Y-m",$date_debut))==date("Y-m",$date_fin))
{ // meme annee et mois, jours differents
$d=date("Y-m-d",$date_debut);
$s = affdate_jourcourt($d);
if ($horaire=='oui')
$s .= " ".($hd=date("H:i",$date_debut));
$s .= "
"._T('agenda:evenement_date_au').date(($horaire=='oui')?"d H:i ":"d ",$date_fin);
}
else if ((date("Y",$date_debut))==date("Y",$date_fin))
{ // meme annee, mois et jours differents
$d=date("Y-m-d",$date_debut);
$s = affdate_jourcourt($d);
if ($horaire=='oui')
$s .= " ".date("H:i",$date_debut);
$d = date("Y-m-d",$date_fin);
$s .= "
"._T('agenda:evenement_date_au').affdate_jourcourt($d);
if ($horaire=='oui')
$s .= " ".date("H:i",$date_fin);
}
else
{ // tout different
$s = affdate($d);
if ($horaire=='oui')
$s .= " ".date("(H:i)",$date_debut);
$d = date("Y-m-d",$date_fin);
$s .= "
"._T('agenda:evenement_date_au').affdate($d);
if ($horaire=='oui')
$s .= " ".date("(H:i)",$date_fin);
}
return $s;
}
function Agenda_formulaire_article_afficher_evenements($id_article, $flag_editable)
{
global $connect_statut, $options,$connect_id_auteur;
$out = "";
$les_evenements = array();
$result = spip_query( "SELECT * FROM spip_evenements AS evenements "
. "WHERE evenements.id_article=".spip_abstract_quote($id_article)
. " AND evenements.id_evenement_source=0"
. " GROUP BY evenements.id_evenement ORDER BY evenements.date_debut");
if (spip_num_rows($result)) {
$out .= "
";
$out .= generer_url_post_ecrire("articles", "id_article=$id_article");
if (in_array($id_evenement,explode(",",$les_evenements)) && $edit==1){
$out .= ""._T('agenda:titre_cadre_modifier_evenement')." \n";
} else {
$out .= ""._T('agenda:titre_cadre_ajouter_evenement')." \n";
}
$out .= " ";
if (in_array($id_evenement,explode(",",$les_evenements)) && $edit==1){
$out .= Agenda_formulaire_edition_evenement($id_evenement, false);
$out .= " ";
$out .= " |