diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-11-05 11:37:33 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-11-05 11:37:33 +0100 |
| commit | 831ee6e441e33bc4ce7a87aeb58de45efcadc807 (patch) | |
| tree | 96d1bc1a7cde62039223537467ff4e81ffc7bc7d /module/main.scm | |
| parent | Remove old next-event. (diff) | |
| download | calp-831ee6e441e33bc4ce7a87aeb58de45efcadc807.tar.gz calp-831ee6e441e33bc4ce7a87aeb58de45efcadc807.tar.xz | |
Move remaining stuff out of vcomponent.
Diffstat (limited to 'module/main.scm')
| -rwxr-xr-x | module/main.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/main.scm b/module/main.scm index 93baf35d..4bf20ede 100755 --- a/module/main.scm +++ b/module/main.scm @@ -38,7 +38,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 parse-calendar calendar-files)) + (define calendars (map parse-cal-path calendar-files)) (define events (concatenate ;; TODO does this drop events? (map (lambda (cal) (filter (lambda (o) (eq? 'VEVENT (type o))) |