diff options
| author | Thomas White <taw@physics.org> | 2020-09-06 22:23:17 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2020-09-06 22:23:17 +0200 |
| commit | f92fa565e9366e90d6faff83668a654e553d34ce (patch) | |
| tree | d39ec4ff63da6cbcbd465a4369c5a432ac7ed0e6 /guile/starlet/playback.scm | |
| parent | 6a473c6adff522378050cd9b227e946569a85db6 (diff) | |
Make cue 0 implicit
Diffstat (limited to 'guile/starlet/playback.scm')
| -rw-r--r-- | guile/starlet/playback.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index 98ce445..6c7ed1b 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -265,4 +265,10 @@ (define-syntax cue-list - (identifier-syntax vector)) + (syntax-rules () + ((_ body ...) + (vector (cue 0 + (cue-state (apply-state home-state)) + #:fade-up 1 + #:fade-down 1) + body ...)))) |