From bfa806b989cce6dc2030a02fb14a303d8068dd0a Mon Sep 17 00:00:00 2001 From: Thomas White Date: Thu, 27 May 2021 21:45:53 +0200 Subject: Set the preset state when cutting between cues --- guile/starlet/playback.scm | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'guile/starlet/playback.scm') diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index c8da94c..cdb4274 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -157,11 +157,20 @@ (set-next-cue-index! pb (+ cue-index 1)) (set-cue-clock! pb #f) (set-playback-state! pb 'ready) + + ;; Set the actual state (state-for-each (lambda (fix attr val) (set-in-state! pb fix attr (lambda () val))) (get-tracked-state (vector-ref (get-playback-cue-list pb) - cue-index)))) + cue-index))) + + ;; Set the preset state on top + (state-for-each + (lambda (fix attr val) + (set-in-state! pb fix attr (lambda () val))) + (get-preset-state (vector-ref (get-playback-cue-list pb) + cue-index)))) (define (cut-to-cue-number! pb cue-number) -- cgit v1.2.3