aboutsummaryrefslogtreecommitdiff
path: root/guile/starlet/playback.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guile/starlet/playback.scm')
-rw-r--r--guile/starlet/playback.scm6
1 files changed, 3 insertions, 3 deletions
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