From 533b1994a73b6ae5003ad73109a600c0d05b4a92 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Fri, 4 Oct 2019 00:15:19 +0200
Subject: Actually fix NAME.

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

(limited to 'module/vcomponent/control.scm')

diff --git a/module/vcomponent/control.scm b/module/vcomponent/control.scm
index 38199161..3bdecc5a 100644
--- a/module/vcomponent/control.scm
+++ b/module/vcomponent/control.scm
@@ -5,7 +5,7 @@
 
 
 (eval-when (expand load)                ; No idea why I must have load here.
-  (define href (make-procedure-with-setter hashq-ref hashq-set!))
+  (define href (make-procedure-with-setter hash-ref hash-set!))
 
   (define (set-temp-values! table component kvs)
     (for-each (lambda (kv)
-- 
cgit v1.2.3