From 9470b30951bc567fbe8d14fa0792bd01a86bfd64 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Thu, 7 Sep 2023 15:34:28 +0200
Subject: Remove accidental extra 'vcomponent control' module.

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

(limited to 'module/vcomponent/util')

diff --git a/module/vcomponent/util/control.scm b/module/vcomponent/util/control.scm
index 0869543d..19a6fa18 100644
--- a/module/vcomponent/util/control.scm
+++ b/module/vcomponent/util/control.scm
@@ -26,7 +26,7 @@
 ;; TODO what is this even used for?
 (define-syntax with-replaced-properties
   (syntax-rules ()
-    [(_ (component (key val) ...)
+    [(G_ (component (key val) ...)
         body ...)
 
      (let ((htable (make-hash-table 10)))
-- 
cgit v1.2.3