From 2e5e9d48fbb4186ac86ec9aa32387e0d261f4dfa Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Fri, 4 Sep 2026 21:57:32 +0200 Subject: [PATCH] gnus-icalendar: use DURATION to calculate end-time of the event * lisp/gnus/gnus-icalendar.el (gnus-icalendar-event-from-ical): Use DURATION to calculate end-time if DTEND is absent. --- lisp/gnus/gnus-icalendar.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/gnus-icalendar.el b/lisp/gnus/gnus-icalendar.el index 9ee2bf492da..b43630189f8 100644 --- a/lisp/gnus/gnus-icalendar.el +++ b/lisp/gnus/gnus-icalendar.el @@ -200,6 +200,7 @@ recipient." (ical:description :value description) (ical:dtstart :value dtstart) (ical:dtend :value dtend) + (ical:duration :value duration) (ical:location :value location) (ical:rrule :value rrule) (ical:uid :value uid)) @@ -223,7 +224,8 @@ recipient." :location location :recur rrule :start-time (encode-time dtstart) - :end-time (and dtend (encode-time dtend)) + :end-time (encode-time + (or dtend (decoded-time-add dtstart duration))) :rsvp rsvp-p :participation-type participation-type :req-participants (car req/opt)