---

Class ::xo::ical::VEVENT

::xo::ical::VEVENT create ... \
           [ -creation_date creation_date ] \
           [ -description description ] \
           [ -dtend dtend ] \
           [ -dtstamp dtstamp ] \
           [ -dtstart dtstart ] \
           [ -formatted_recurrences formatted_recurrences ] \
           [ -geo geo ] \
           [ -is_day_item (default "false") ] \
           [ -last-modified last-modified ] \
           [ -last_modified last_modified ] \
           [ -location location ] \
           [ -priority priority ] \
           [ -sequence sequence ] \
           [ -status status ] \
           [ -summary summary ] \
           [ -transp transp ] \
           [ -uid uid ] \
           [ -url url ]

VEVENT optional fields, must not occur more than once class / *created / *description / *dtstart / *geo / *last-mod / *location / organizer / *priority / *dtstamp / seq / *status / *summary / transp / *uid / *url / recurid / dtend or duration may appear, but dtend and duration are mutual exclusive *dtend / duration / optional fields, may occur more than once attach / attendee / categories / comment / contact / exdate / exrule / rstatus / related / resources / rdate / rrule / x-prop

Defined in packages/xotcl-core/tcl/ical-procs.tcl

Class Relations

• class: ::nx::Class
• superclass: ::xo::ical::VCALITEM

::nx::Class create ::xo::ical::VEVENT \
     -superclass ::xo::ical::VCALITEM

Methods (to be applied on instances)

• finish (scripted, public)

   <instance of xo::ical::VEVENT> finish parse_error

  In case, there was no :dtend given, set it either to the value of :dtstart, or :dtstart + :duration

  Parameters:

  parse_error (required)

  Testcases:

  No testcase defined.

  if {![info exists :dtend]} {
    set end_clock [clock scan ${:dtstart}]
    if {[info exists :duration]} {
      incr end_clock ${:duration}
    }
    set :dtend [::xo::ical clock_to_oacstime $end_clock]
  }
  # TODO: not sure, for what purpose we need parse_error
  incr $parse_error $parse_error

---