From 9867fd292bdde5858129601ccbabd9f9d15f2411 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Tue, 14 Jul 2020 12:59:32 +0200
Subject: Add TODO about VALUE in some cases.

---
 module/vcomponent/base.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'module')

diff --git a/module/vcomponent/base.scm b/module/vcomponent/base.scm
index 413e7c0c..48893333 100644
--- a/module/vcomponent/base.scm
+++ b/module/vcomponent/base.scm
@@ -88,6 +88,8 @@
   (hashq-ref (get-component-properties component)
              key))
 
+;;; TODO key=DTSTART, (date? value) => #t
+;;; KRÄVER att (props vline 'VALUE) <- "DATE"
 (define (set-property! component key value)
   (let ((ht (get-component-properties component)))
    (cond [(hashq-ref ht key #f)
-- 
cgit v1.2.3