aboutsummaryrefslogtreecommitdiff
path: root/module/main.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@hornquist.se>2019-11-03 13:39:57 +0100
committerHugo Hörnquist <hugo@hornquist.se>2019-11-03 13:39:57 +0100
commit275dfc4b4fc7bd8ad3244dbd6c9053fe1ceb7f5b (patch)
tree53e9c8380e69d3c0a68317b1280174293e1d9eb5 /module/main.scm
parentReadd color parsing, fix minor bugs. (diff)
downloadcalp-275dfc4b4fc7bd8ad3244dbd6c9053fe1ceb7f5b.tar.gz
calp-275dfc4b4fc7bd8ad3244dbd6c9053fe1ceb7f5b.tar.xz
Remove make-vcomponent.
Diffstat (limited to 'module/main.scm')
-rwxr-xr-xmodule/main.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/main.scm b/module/main.scm
index f765496f..423daeb9 100755
--- a/module/main.scm
+++ b/module/main.scm
@@ -39,7 +39,7 @@ exec guile -e main -s $0 "$@"
;;
;; Given as a sepparate function from main to ease debugging.
(define* (init proc #:key (calendar-files (calendar-files)))
- (define calendars (map make-vcomponent calendar-files))
+ (define calendars (map parse-calendar calendar-files))
(define events (concatenate
;; TODO does this drop events?
(map (lambda (cal) (filter (lambda (o) (eq? 'VEVENT (type o)))