caldav::calendars proc header (public)

 caldav::calendars header [ -calendar_name calendar_name ]

Defined in packages/xotcl-core/tcl/01-debug-procs.tcl

Return the header of the ical file. GN TODO: don't hardcode TIMEZONE "X-WR-TIMEZONE:Europe/Vienna"

Switches:

-calendar_name (optional)

Testcases:

No testcase defined.

Source code:

#
# Return the header of the ical file.
#
# GN TODO: don't hardcode TIMEZONE
# "X-WR-TIMEZONE:Europe/Vienna"
#
if {$calendar_name eq ""} {
    set $calendar_name "Calendar from [ad_system_name]"
}

append lines  "BEGIN:VCALENDAR" \r\n  "X-WR-CALNAME:$calendar_name" \r\n  "PRODID:-//OpenACS//OpenACS 6.0 MIMEDIR//EN" \r\n  "CALSCALE:GREGORIAN" \r\n  "VERSION:2.0" \r\n  "METHOD:PUBLISH" \r\n

XQL Not present:

Generic, PostgreSQL, Oracle