[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] [PATCH] ox-icalendar: fix handling of timestamps
From: |
Viktor Rosenfeld |
Subject: |
Re: [O] [PATCH] ox-icalendar: fix handling of timestamps |
Date: |
Sun, 11 Aug 2013 14:53:54 +0200 |
User-agent: |
Mutt/1.5.21 (2010-09-15) |
Hi Aaron,
Aaron Ecay wrote:
> > (lambda (ts)
> > - (let ((uid (format "TS%d-%s" (incf counter) uid)))
> > - (org-icalendar--vevent entry ts uid summary loc desc cat)))
> > + (let ((type (org-element-property :type ts))
> > + (uid (format "TS%d-%s" (incf counter) uid)))
> > + (when (or (eq with-timestamps 'all)
>
> Here, I think you want to compare with t, not 'all (check the defcustom
> for ‘org-icalendar-with-timestamps’).
Thanks, fixed!
>
> > + (and (eq with-timestamps 'active)
> > + (or (eq type 'active)
> > + (eq type 'active-range)))
>
> This is only a cosmetic comment, so feel free to disregard it, but:
> might the ‘(or ...)’ be cleaner as ‘(memq type '(active active-range))’?
Thanks, fixed! I did not like the construction with `or' but I didn't
know about `memq'. Learning Elisp as I go...
New patch is attached.
Cheers,
Viktor
>
> --
> Aaron Ecay
>
0001-ox-icalendar-fix-handling-of-timestamps.patch
Description: Text document