diff options
| author | Thomas White <taw@physics.org> | 2020-10-23 22:38:55 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2020-10-23 22:38:55 +0200 |
| commit | ac62964305db6d34291e075d87b8a6b533fd4c24 (patch) | |
| tree | e9d840b10240f734333f7b554f083a86257686a7 /guile/starlet/playback.scm | |
| parent | e302148f2e8791585edfc23705450aa921faaa17 (diff) | |
fade-up -> up-time, fade-down -> down-time
This makes everything consistent: {up,down}-{time,delay}
Diffstat (limited to 'guile/starlet/playback.scm')
| -rw-r--r-- | guile/starlet/playback.scm | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index 5d3332e..2b7415c 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -339,15 +339,15 @@ (define* (cue-part attr-list #:key - (fade-up 5) - (fade-down 5) + (up-time 5) + (down-time 5) (up-delay 0) (down-delay 0)) (make-cue-part attr-list (make-fade-times - fade-up - fade-down + up-time + down-time up-delay down-delay))) @@ -357,8 +357,8 @@ (receive (cue-parts rest-minus-cue-parts) (partition cue-part? rest) (let-keywords rest-minus-cue-parts #f - ((fade-up 5) - (fade-down 5) + ((up-time 5) + (down-time 5) (up-delay 0) (down-delay 0) (track-intensities #f)) @@ -367,8 +367,8 @@ state-function #f (make-fade-times - fade-up - fade-down + up-time + down-time up-delay down-delay) track-intensities @@ -404,6 +404,6 @@ ((_ body ...) (vector (cue 0 (lambda () #f) ;; The real base state is in ensure-cue-zero-realized - #:fade-up 0 - #:fade-down 0) + #:up-time 0 + #:down-time 0) body ...)))) |