Use mapped bus id

tidalcycles · Apr 18, 2024 · 9eca1d6 · 9eca1d6
1 parent c3d9dd3
commit 9eca1d6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Sound/Tidal/Stream/Process.hs b/src/Sound/Tidal/Stream/Process.hs
@@ -194,7 +194,7 @@ toOSC maybeBusses pe osc@(OSC _ _)
                     (\(('^':k), (VI b)) -> do v <- Map.lookup k playmap
                                               return $ (tsPart,
                                                         True, -- bus message ?
-                                                        O.Message "/c_set" [O.int32 b, toDatum v]
+                                                        O.Message "/c_set" [O.int32 (toBus b), toDatum v]
                                                       )
                     )
                     (Map.toList busmap)