aboutsummaryrefslogtreecommitdiff
path: root/guile/starlet/midi-control/faders.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guile/starlet/midi-control/faders.scm')
-rw-r--r--guile/starlet/midi-control/faders.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/guile/starlet/midi-control/faders.scm b/guile/starlet/midi-control/faders.scm
index e5f9cd4..d43a513 100644
--- a/guile/starlet/midi-control/faders.scm
+++ b/guile/starlet/midi-control/faders.scm
@@ -205,6 +205,13 @@
fixtures
controller)
(for-each (lambda (fix initial-val gradient)
+ (when (colour-component-id? attr-name)
+ (set-in-state!
+ programmer-state
+ fix
+ 'colour
+ (current-value fix 'colour)
+ controller))
(set-in-state! programmer-state
fix
attr-name