diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-10-02 23:05:01 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-10-02 23:05:01 +0200 |
| commit | 1c3bd94c328df0c8b4293bc42a25b2d7c851fd0c (patch) | |
| tree | fb529813816b2d0bce24f475f367e2556b7a2f71 /module/vcomponent.scm | |
| parent | Disabled bunch of old stuff, new stuff kinda builds. (diff) | |
| download | calp-1c3bd94c328df0c8b4293bc42a25b2d7c851fd0c.tar.gz calp-1c3bd94c328df0c8b4293bc42a25b2d7c851fd0c.tar.xz | |
Made parser work again (for single files).
Diffstat (limited to 'module/vcomponent.scm')
| -rw-r--r-- | module/vcomponent.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent.scm b/module/vcomponent.scm index fc360486..a106d993 100644 --- a/module/vcomponent.scm +++ b/module/vcomponent.scm @@ -1,5 +1,5 @@ (define-module (vcomponent) - #:use-module ((vcomponent primitive) :select (parse-path make-vcomponent)) + #:use-module ((vcomponent primitive) :select (parse-cal-path make-vcomponent)) #:use-module (vcomponent datetime) #:use-module (vcomponent recurrence) #:use-module (vcomponent timezone) @@ -82,7 +82,7 @@ (define* (make-vcomponent #:optional path) (if (not path) (make-vcomponent) - (let* ((root (parse-path path)) + (let* ((root (parse-cal-path path)) (component (case (string->symbol (or (attr root "X-HNH-SOURCETYPE") "no-type")) ;; == Single ICS file == |