diff options
| -rw-r--r-- | guile/starlet/playback.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index efbd1d6..39ccbe0 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -435,9 +435,9 @@ (define (ensure-cue-zero-realized cue-list) - (unless (get-realized-state (vector-ref cue-list 0)) - (set-realized-state! (vector-ref cue-list 0) - (make <starlet-state>)))) + (let ((cue-zero (vector-ref cue-list 0))) + (unless (get-realized-state cue-zero) + (set-realized-state! cue-zero (make <starlet-state>))))) ;; Get the state for a cue, taking into account tracking etc |