From 5709173103aedbab5079252709d83947f43b2ca4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 10 Apr 2019 00:46:47 +0200
Subject: Minor cleanups.

---
 module/vcalendar/output.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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

diff --git a/module/vcalendar/output.scm b/module/vcalendar/output.scm
index 48197cb4..a15857f7 100644
--- a/module/vcalendar/output.scm
+++ b/module/vcalendar/output.scm
@@ -28,8 +28,7 @@
             (type comp) comp)
     (for-each-in kvs
                  (lambda (kv)
-                   (let ((key (car kv))
-                         (value (cdr kv)))
+                   (let* (((key . value) kv))
                      (format #t "~a ~20@a: ~a~%"
                              (make-string depth #\:)
                              key value))))
-- 
cgit v1.2.3