Niels Giesen <niels.gie...@gmail.com> writes: > --- a/lisp/org-icalendar.el > +++ b/lisp/org-icalendar.el > @@ -412,7 +412,10 @@ When COMBINE is non nil, add the category to each line." > (if scheduledp (setq summary (concat "S: " summary))) > (if (string-match "\\`<%%" ts) > (with-current-buffer sexp-buffer > - (insert (substring ts 1 -1) " " summary "\n")) > + (let ((entry (substring ts 1 -1))) > + (put-text-property 0 1 'uid > + (concat " " prefix uid) entry) > + (insert entry " " summary "\n"))) > (princ (format "BEGIN:VEVENT > UID: %s > %s
(Note that this has been applied.) -- Bastien
