aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/base.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2023-11-14 04:59:21 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2023-11-16 00:51:19 +0100
commite121b12583d5109c09a8ac019709cb56192a1f55 (patch)
tree6905884333a6fa004e5bc66c39b8037c85b040c4 /module/vcomponent/base.scm
parentTests for vcomponent datetime and create. (diff)
downloadcalp-e121b12583d5109c09a8ac019709cb56192a1f55.tar.gz
calp-e121b12583d5109c09a8ac019709cb56192a1f55.tar.xz
Minor comment changes.
Diffstat (limited to 'module/vcomponent/base.scm')
-rw-r--r--module/vcomponent/base.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/module/vcomponent/base.scm b/module/vcomponent/base.scm
index 4cacbb46..39b2c810 100644
--- a/module/vcomponent/base.scm
+++ b/module/vcomponent/base.scm
@@ -121,6 +121,7 @@
(modify parent* vcomponent-children
(lambda (table)
(let ((child
+ ;; TODO is this the correct place to generate UIDs?
(if (prop child 'UID)
child
(prop child 'UID (uuid)))))