0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-20 13:42:59 -05:00

♻ Fix lint

This commit is contained in:
Florian Schroedl 2024-12-09 11:52:08 +01:00
parent 82ce61ef49
commit 2a766a7190

View file

@ -132,34 +132,34 @@
(t/deftest test-apply-color (t/deftest test-apply-color
(t/testing "applies color token and updates the shape fill and stroke-color" (t/testing "applies color token and updates the shape fill and stroke-color"
(t/async (t/async
done done
(let [color-token {:name "color.primary" (let [color-token {:name "color.primary"
:value "red" :value "red"
:type :color} :type :color}
file (-> (setup-file-with-tokens) file (-> (setup-file-with-tokens)
(update-in [:data :tokens-lib] (update-in [:data :tokens-lib]
#(ctob/add-token-in-set % "Set A" (ctob/make-token color-token)))) #(ctob/add-token-in-set % "Set A" (ctob/make-token color-token))))
store (ths/setup-store file) store (ths/setup-store file)
rect-1 (cths/get-shape file :rect-1) rect-1 (cths/get-shape file :rect-1)
events [(wtch/apply-token {:shape-ids [(:id rect-1)] events [(wtch/apply-token {:shape-ids [(:id rect-1)]
:attributes #{:color} :attributes #{:color}
:token (toht/get-token file "color.primary") :token (toht/get-token file "color.primary")
:on-update-shape wtch/update-fill}) :on-update-shape wtch/update-fill})
(wtch/apply-token {:shape-ids [(:id rect-1)] (wtch/apply-token {:shape-ids [(:id rect-1)]
:attributes #{:stroke-color} :attributes #{:stroke-color}
:token (toht/get-token file "color.primary") :token (toht/get-token file "color.primary")
:on-update-shape wtch/update-stroke-color})]] :on-update-shape wtch/update-stroke-color})]]
(tohs/run-store-async (tohs/run-store-async
store done events store done events
(fn [new-state] (fn [new-state]
(let [file' (ths/get-file-from-store new-state) (let [file' (ths/get-file-from-store new-state)
token-target' (toht/get-token file' "rotation.medium") token-target' (toht/get-token file' "rotation.medium")
rect-1' (cths/get-shape file' :rect-1)] rect-1' (cths/get-shape file' :rect-1)]
(t/is (some? (:applied-tokens rect-1'))) (t/is (some? (:applied-tokens rect-1')))
(t/is (= (:fill (:applied-tokens rect-1')) (:name token-target'))) (t/is (= (:fill (:applied-tokens rect-1')) (:name token-target')))
(t/is (= (get-in rect-1' [:fills 0 :fill-color]) "#ff0000")) (t/is (= (get-in rect-1' [:fills 0 :fill-color]) "#ff0000"))
(t/is (= (:stroke (:applied-tokens rect-1')) (:name token-target'))) (t/is (= (:stroke (:applied-tokens rect-1')) (:name token-target')))
(t/is (= (get-in rect-1' [:strokes 0 :stroke-color]) "#ff0000"))))))))) (t/is (= (get-in rect-1' [:strokes 0 :stroke-color]) "#ff0000")))))))))
(t/deftest test-apply-dimensions (t/deftest test-apply-dimensions
(t/testing "applies dimensions token and updates the shapes width and height" (t/testing "applies dimensions token and updates the shapes width and height"