From 04a8a13b92bc1823cc99c3bac1ee9bf8ef31df15 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Sat, 1 Aug 2020 20:58:21 +0200
Subject: Repair vcomponent describe.

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

diff --git a/module/vcomponent/describe.scm b/module/vcomponent/describe.scm
index 41c62c56..a579c245 100644
--- a/module/vcomponent/describe.scm
+++ b/module/vcomponent/describe.scm
@@ -14,7 +14,7 @@
   (format #t "~aBEGIN ~a~%" ii (type vcomponent))
 
   (for-each (lambda (kv)
-              (let* ((key . values) kv)
+              (let* (((key . values) kv))
                 (define (out vline)
                   (format #t "~a~a = ~a"
                           iii
-- 
cgit v1.2.3