From 4c704c7f4a5fd667111755a8870b1a96b9e46c60 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Thu, 31 Dec 2020 17:57:23 +0100 Subject: Reduce scope of merge-rule-replace --- guile/starlet/midi-control/faders.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'guile/starlet/midi-control') diff --git a/guile/starlet/midi-control/faders.scm b/guile/starlet/midi-control/faders.scm index 8fa7351..67ece1b 100644 --- a/guile/starlet/midi-control/faders.scm +++ b/guile/starlet/midi-control/faders.scm @@ -54,11 +54,11 @@ (define midi-callbacks '()) -(define (merge-rule-replace attr a b) - b) - (define (sel fixture) + + (define (merge-rule-replace attr a b) b) + (when selection-state (add-state-to-state! merge-rule-replace selection-state -- cgit v1.2.3