Add auto-key mode to main toolbar
This commit is contained in:
parent
3879d76d57
commit
34f62ab007
11 changed files with 82 additions and 17 deletions
|
|
@ -216,3 +216,13 @@
|
|||
(let [d (node/toggle-key (node/set-segment-interp c [:xform :pos] 0 :hold) [:xform :pos] 0 nil)]
|
||||
(is (not (contains? (get-in d [:channels [:xform :pos] :segments]) 0))
|
||||
"taking a key off takes its gap's choice with it"))))
|
||||
|
||||
(deftest auto-keying-a-channel-from-a-parameter-edit
|
||||
(let [n {:id :x :kind :group}
|
||||
keyed (node/set-keyed-channel n [:xform :rot] 7 1.25)
|
||||
moved (node/set-keyed-channel keyed [:xform :rot] 11 2.5)
|
||||
visible (node/set-keyed-channel n [:vis] 7 false)]
|
||||
(is (= {7 1.25, 11 2.5} (get-in moved [:channels [:xform :rot] :keys])))
|
||||
(is (= :linear (get-in moved [:channels [:xform :rot] :interp])))
|
||||
(is (= :hold (get-in visible [:channels [:vis] :interp]))
|
||||
"boolean parameters do not tween")))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue