diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-04-06 19:07:41 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-04-06 19:07:41 +0200 |
commit | 78b23e08a3bfea604ac123aeb330d762c275a622 (patch) | |
tree | 22806d56bb806bc9054781a1f2c72adc6d1bc68a | |
parent | Add ev-time<?. (diff) | |
download | calp-78b23e08a3bfea604ac123aeb330d762c275a622.tar.gz calp-78b23e08a3bfea604ac123aeb330d762c275a622.tar.xz |
Fix timezone accumelator.
Diffstat (limited to '')
-rw-r--r-- | module/vcalendar.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/vcalendar.scm b/module/vcalendar.scm index ab404a1a..12e2d9a5 100644 --- a/module/vcalendar.scm +++ b/module/vcalendar.scm @@ -116,7 +116,7 @@ (for-each (lambda (component) (case (type component) ((VTIMEZONE) - (let ((zones (children cal 'VTIMEZONE))) + (let ((zones (children accum 'VTIMEZONE))) (unless (find (lambda (z) (string=? (attr z "TZID") (attr component "TZID"))) |