summaryrefslogtreecommitdiff
path: root/tweening.lisp
diff options
context:
space:
mode:
authorBoutade <thegoofist@protonmail.com>2019-10-15 11:39:17 -0500
committerBoutade <thegoofist@protonmail.com>2019-10-15 11:39:17 -0500
commit23284accc56c71f3e293fc9ac0c923988ce4ab6a (patch)
tree802e35cbb5b18b63bbe7fba8162415b5ef97bb65 /tweening.lisp
parentb8776e6d3857d275cbb8b5983cb2f3b51eb44cb0 (diff)
on-complete extensions
Diffstat (limited to 'tweening.lisp')
-rw-r--r--tweening.lisp3
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)))