Function: diary-icalendar-anniversary-sexp-to-recurrence

diary-icalendar-anniversary-sexp-to-recurrence is a byte-compiled function defined in diary-icalendar.el.gz.

Signature

(diary-icalendar-anniversary-sexp-to-recurrence SEXP)

Documentation

Convert diary-anniversary SEXP to icalendar-dtstart and icalendar-rrule.

Returns a pair of nodes (START RRULE).

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/diary-icalendar.el.gz
(defun di:anniversary-sexp-to-recurrence (sexp)
  "Convert `diary-anniversary' SEXP to `icalendar-dtstart' and `icalendar-rrule'.
Returns a pair of nodes (START RRULE)."
  (let* ((d1 (nth 1 sexp))
         (d2 (nth 2 sexp))
         (d3 (nth 3 sexp))
         (dtstart (diary-make-date d1 d2 (or d3 di:recurring-start-year)))
         (rrule '((FREQ YEARLY))))
    (list
     (ical:make-property ical:dtstart dtstart (ical:valuetypeparam 'ical:date))
     (ical:make-property ical:rrule rrule))))