Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-21 06:02:32 -05:00
Code Issues Activity

Add sizing test

Browse source
This commit is contained in:
Florian Schroedl 2024-07-04 11:12:49 +02:00
parent 7abfaef1cb
commit 694baeee0c
1 changed files with 27 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
frontend/test/token_tests/logic/token_actions_test.cljs
View file

@ -87,7 +87,7 @@
(t/is (= (:ry rect-1') 24))))))))
(t/deftest test-apply-dimensions
(t/testing "applies radius token and updates the shapes radius")
(t/testing "applies dimensions token and updates the shapes width and height")
(t/async
done
(let [file (-> (setup-file)
@ -112,6 +112,32 @@
(t/is (= (:width rect-1') 100))
(t/is (= (:height rect-1') 100))))))))
(t/deftest test-apply-sizing
(t/testing "applies sizing token and updates the shapes width and height")
(t/async
done
(let [file (-> (setup-file)
(toht/add-token :token-target {:value "100"
:name "sizing.sm"
:type :sizing}))
store (ths/setup-store file)
rect-1 (cths/get-shape file :rect-1)
events [(wtc/apply-token {:shape-ids [(:id rect-1)]
:attributes #{:width :height}
:token (toht/get-token file :token-target)
:on-update-shape wtc/update-shape-dimensions})]]
(tohs/run-store-async
store done events
(fn [new-state]
(let [file' (ths/get-file-from-store new-state)
token-target' (toht/get-token file' :token-target)
rect-1' (cths/get-shape file' :rect-1)]
(t/is (some? (:applied-tokens rect-1')))
(t/is (= (:width (:applied-tokens rect-1')) (:id token-target')))
(t/is (= (:height (:applied-tokens rect-1')) (:id token-target')))
(t/is (= (:width rect-1') 100))
(t/is (= (:height rect-1') 100))))))))
(t/deftest test-apply-opacity
(t/testing "applies opacity token and updates the shapes opacity")
(t/async