function &_getICal($filename)
{
$requestText = '';
$handle = fopen($filename, 'r');
while (!feof($handle)) {
$requestText .= fread($handle, 8192);
}
$mime =& MIME_Structure::parseTextMIMEMessage($requestText);
$parts = $mime->contentTypeMap();
foreach ($parts as $mimeid => $conttype) {
if ($conttype == 'text/calendar') {
$part = $mime->getPart($mimeid);
$iCalendar = new Horde_Icalendar();
$iCalendar->parsevCalendar($part->transferDecode());
return $iCalendar;
}
}
// No iCal found
return false;
}
