diff options
author | Boutade <thegoofist@protonmail.com> | 2019-10-15 11:39:17 -0500 |
---|---|---|
committer | Boutade <thegoofist@protonmail.com> | 2019-10-15 11:39:17 -0500 |
commit | 23284accc56c71f3e293fc9ac0c923988ce4ab6a (patch) | |
tree | 802e35cbb5b18b63bbe7fba8162415b5ef97bb65 /tweening.lisp | |
parent | b8776e6d3857d275cbb8b5983cb2f3b51eb44cb0 (diff) |
on-complete extensions
Diffstat (limited to 'tweening.lisp')
-rw-r--r-- | tweening.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tweening.lisp b/tweening.lisp index bc9f37e..df9b398 100644 --- a/tweening.lisp +++ b/tweening.lisp @@ -58,7 +58,7 @@ ((:sine-in-out :sinusoidal-in-out) #'sinusoidal-in-out) ((:sine-out :sinusoidal-out ) #'sinusoidal-out))) -(defun animating (&key (by :none) the of to for at) +(defun animating (&key (by :none) the of to for at before) "A wrapper around ANIMATE that is aware of any default values defined in the the most recently enclosing form. @@ -88,6 +88,7 @@ the to :start (or at (when-bound *start-time*) 0) + :on-complete before :ease (if (functionp by) by (keyword->ease-fn by)) :duration (or for (when-bound *duration*) 0))) |