From aaba9ab35e01a5b433158cb66f5e6789bf29eda7 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Sun, 7 Mar 2021 09:14:59 +0100
Subject: state-source: Prefix with lighting-state instead of begin

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

(limited to 'guile')

diff --git a/guile/starlet/base.scm b/guile/starlet/base.scm
index 6d4dc40..d3af934 100644
--- a/guile/starlet/base.scm
+++ b/guile/starlet/base.scm
@@ -644,7 +644,7 @@ pre-existing contents."
 
 
 (define (state-source a)
-  (cons 'begin
+  (cons 'lighting-state
         (state-map (lambda (fix attr val)
                      (list 'at
                            (get-fixture-name fix)
-- 
cgit v1.2.3