aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/util/control.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/util/control.scm')
-rw-r--r--module/vcomponent/util/control.scm2
1 files changed, 1 insertions, 1 deletions
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)))