diff options
Diffstat (limited to 'module/vcomponent/parse/component.scm')
-rw-r--r-- | module/vcomponent/parse/component.scm | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/module/vcomponent/parse/component.scm b/module/vcomponent/parse/component.scm index 6c4c6022..3278af85 100644 --- a/module/vcomponent/parse/component.scm +++ b/module/vcomponent/parse/component.scm @@ -259,22 +259,6 @@ (cons (make-vcomponent (string->symbol (cadr head))) stack))] [(string=? "END" (car head)) - - (when (eq? (type (car stack)) 'VEVENT) - - ;; This isn't part of the field values since we "need" - ;; the type of DTSTART for UNTIL to work. - ;; This could however be side steped by auto detecting - ;; @type{date}s vs @type{datetime}s in @function{parse-recurrence-rule}. - #t - #; - (when (attr (car stack) 'RRULE) ; ; - (set! (attr (car stack) 'RRULE) ; ; - ((@ (vcomponent recurrence) parse-recurrence-rule) ; ; - (attr (car stack) 'RRULE) ; ; - (if (date? (attr (car stack) 'DTSTART)) ; ; - parse-ics-date parse-ics-datetime))))) - (loop (cdr lst) (if (null? (cdr stack)) ;; return |