From 0d249a996d2c969feef525933de925af88e6c249 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 24 Jul 2020 17:24:01 +0200
Subject: Change internal fields to stat with a dash.

---
 module/output/ical.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'module/output/ical.scm')

diff --git a/module/output/ical.scm b/module/output/ical.scm
index 6b8728a6..e9636fdc 100644
--- a/module/output/ical.scm
+++ b/module/output/ical.scm
@@ -153,7 +153,7 @@
   (format #t "END:~a\r\n" (type component))
 
   ;; If we have alternatives, splice them in here.
-  (cond [(prop component 'X-HNH-ALTERNATIVES)
+  (cond [(prop component '-X-HNH-ALTERNATIVES)
          => (lambda (alts) (hash-map->list (lambda (_ comp) (component->ical-string comp))
                                       alts))]))
 
-- 
cgit v1.2.3