aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/recurrence/generate.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@hornquist.se>2019-10-06 22:49:14 +0200
committerHugo Hörnquist <hugo@hornquist.se>2019-10-15 20:05:00 +0200
commit7ce7c3b60505a72a1d46343d6595e1176d107e84 (patch)
tree414dce72e9744ecc5bdba1ccc8cd128168c908c9 /module/vcomponent/recurrence/generate.scm
parentRemove tailing null from parsed color files. (diff)
downloadcalp-7ce7c3b60505a72a1d46343d6595e1176d107e84.tar.gz
calp-7ce7c3b60505a72a1d46343d6595e1176d107e84.tar.xz
Identified timezone problem.
Diffstat (limited to 'module/vcomponent/recurrence/generate.scm')
-rw-r--r--module/vcomponent/recurrence/generate.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/module/vcomponent/recurrence/generate.scm b/module/vcomponent/recurrence/generate.scm
index 3f4cb869..78a5e3d5 100644
--- a/module/vcomponent/recurrence/generate.scm
+++ b/module/vcomponent/recurrence/generate.scm
@@ -54,6 +54,8 @@
(set! (attr ev 'DTSTART)
(copy-time (attr ev 'DTSTART)))
+ (set! (attr ev 'date-obj) d)
+
(let ((i (interval r)))
(case (freq r)
((SECONDLY) (mod! (second d) = (+ i)))