task #9747: Can show content of external calendar (ical) into agenda

This commit is contained in:
Juanjo Menent
2011-05-31 22:04:38 +00:00
parent 45fd45e3ad
commit e92c686bcb

View File

@@ -504,7 +504,9 @@ if ($conf->global->ENABLE_AGENDA_EXT==1 && $conf->global->AGENDA_EXT_NB>0)
{ {
// Create a new object action // Create a new object action
$event=new ActionComm($db); $event=new ActionComm($db);
$event->id=$icalevent[UID]; $paramkey='AGENDA_EXT_NAME'.$i;
$namecal = $conf->global->$paramkey;
$event->id=$namecal;
$event->datep=$icalevent[DTSTART]; $event->datep=$icalevent[DTSTART];
$event->datef=$icalevent[DTEND]; $event->datef=$icalevent[DTEND];
$event->type_code="ICALEVENT"; $event->type_code="ICALEVENT";
@@ -841,6 +843,7 @@ function show_day_events($db, $day, $month, $year, $monthshown, $style, &$eventa
if ($tmpyearend == $annee && $tmpmonthend == $mois && $tmpdayend == $jour) if ($tmpyearend == $annee && $tmpmonthend == $mois && $tmpdayend == $jour)
print dol_print_date($event->date_end_in_calendar,'%H:%M'); print dol_print_date($event->date_end_in_calendar,'%H:%M');
} }
if ($event->type_code == 'ICALEVENT') print '<br>('.$event->id.')';
print '<br>'."\n"; print '<br>'."\n";
} }
else else