From b275d77794f5243a2e58899dfd7fcb8af0c757d5 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Sun, 22 Nov 2020 22:09:29 +0100 Subject: cut-to-cue-number: Copy the hash table This hash table will become the one which contains the cross-fade functions. Therefore, when we "emphatically" set it like this, it must not be the same table as in the cue state itself. --- guile/starlet/playback.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'guile/starlet/playback.scm') diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index 39ccbe0..126d014 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -130,9 +130,9 @@ (define (cut-to-cue-number! pb cue-number) (let* ((cue-list (get-playback-cue-list pb)) (cue-index (cue-number-to-index cue-list (qnum cue-number)))) - (set-state-hash-table! pb (get-state-hash-table - (realize-state cue-list - cue-index))) + (set-state-hash-table! pb (copy-hash-table + (get-state-hash-table + (realize-state cue-list cue-index)))) (set-next-cue-index! pb (+ cue-index 1)) ;; Wipe out the old fade params -- cgit v1.2.3