[O] [PATCH] icalendar: Make alarm duration RFC5545 compliant
* org-icalendar.el (org-print-icalendar-entries): Make alarm duration RFC5545 compliant. The format of alarm trigger was incorrect because T letter from dur-time element was missing (see http://tools.ietf.org/html/rfc5545#section-3.3.6). This caused some software (such as KOrganizer) to not interpret the alarms correctly. TINYCHANGE --- lisp/org-icalendar.el |2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/lisp/org-icalendar.el b/lisp/org-icalendar.el index bc0efce..a3ea88e 100644 --- a/lisp/org-icalendar.el +++ b/lisp/org-icalendar.el @@ -419,7 +419,7 @@ When COMBINE is non nil, add the category to each line. (let ((t1 (ignore-errors (org-parse-time-string ts 'nodefault (if (and ( org-icalendar-alarm-time 0) (car t1) (nth 1 t1) (nth 2 t1)) - (setq alarm (format \nBEGIN:VALARM\nACTION:DISPLAY\nDESCRIPTION:%s\nTRIGGER:-P0D0H%dM0S\nEND:VALARM summary org-icalendar-alarm-time)) + (setq alarm (format \nBEGIN:VALARM\nACTION:DISPLAY\nDESCRIPTION:%s\nTRIGGER:-P0DT0H%dM0S\nEND:VALARM summary org-icalendar-alarm-time)) (setq alarm )) ) (if (string-match org-bracket-link-regexp summary) -- 1.7.5.4
Re: [O] [PATCH] icalendar: Make alarm duration RFC5545 compliant
Michal Sojka so...@os.inf.tu-dresden.de writes: * org-icalendar.el (org-print-icalendar-entries): Make alarm duration RFC5545 compliant. Applied -- thanks a lot for making the effort of providing the ChangeLog! Best, -- Bastien
[O] [PATCH] icalendar: Make alarm duration RFC5545 compliant
The format of alarm trigger was incorrect because T letter from dur-time element was missing (see http://tools.ietf.org/html/rfc5545#section-3.3.6). This caused some software (such as KOrganizer) to not interpret the alarms correctly. --- lisp/org-icalendar.el |2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/lisp/org-icalendar.el b/lisp/org-icalendar.el index c4b1f89..3632b5e 100644 --- a/lisp/org-icalendar.el +++ b/lisp/org-icalendar.el @@ -419,7 +419,7 @@ When COMBINE is non nil, add the category to each line. (let ((t1 (ignore-errors (org-parse-time-string ts 'nodefault (if (and ( org-icalendar-alarm-time 0) (car t1) (nth 1 t1) (nth 2 t1)) - (setq alarm (format \nBEGIN:VALARM\nACTION:DISPLAY\nDESCRIPTION:%s\nTRIGGER:-P0D0H%dM0S\nEND:VALARM summary org-icalendar-alarm-time)) + (setq alarm (format \nBEGIN:VALARM\nACTION:DISPLAY\nDESCRIPTION:%s\nTRIGGER:-P0DT0H%dM0S\nEND:VALARM summary org-icalendar-alarm-time)) (setq alarm )) ) (if (string-match org-bracket-link-regexp summary) -- 1.7.2.3
