From 5bed6ccfaa22fb5f1217c66b270ce53bc21dbbf8 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Sat, 1 Apr 2023 22:16:49 +0200
Subject: 'colour -> colour

---
 guile/starlet/engine.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'guile')

diff --git a/guile/starlet/engine.scm b/guile/starlet/engine.scm
index 2bf99f2..37656cb 100644
--- a/guile/starlet/engine.scm
+++ b/guile/starlet/engine.scm
@@ -129,7 +129,7 @@
 
 
 (define-method (current-value (fix <fixture>) (attr-name <colour-component-id>))
-  (let ((colour (current-value fix 'colour)))
+  (let ((colour (current-value fix colour)))
     (extract-colour-component colour attr-name)))
 
 
-- 
cgit v1.2.3