From 4f02d8b47d472fc46a2feb085b9df2521d9d5297 Mon Sep 17 00:00:00 2001 From: Florian Schroedl Date: Wed, 21 Aug 2024 11:01:23 +0200 Subject: [PATCH] Fix multi run test --- .../token_tests/logic/token_actions_test.cljs | 35 +++++++++---------- 1 file changed, 17 insertions(+), 18 deletions(-) diff --git a/frontend/test/token_tests/logic/token_actions_test.cljs b/frontend/test/token_tests/logic/token_actions_test.cljs index b4d5997b4..0fb1ea5ec 100644 --- a/frontend/test/token_tests/logic/token_actions_test.cljs +++ b/frontend/test/token_tests/logic/token_actions_test.cljs @@ -61,24 +61,23 @@ (t/is (= (list border-radius-token) (->> (vals set-tokens) (map #(dissoc % :id :modified-at))))))))))))) -;; (t/deftest test-create-multiple-tokens -;; (t/testing "uses selected tokens set when creating multiple tokens" -;; (t/async -;; done -;; (let [file (setup-file) -;; store (ths/setup-store file) -;; events [(wdt/update-create-token border-radius-token) -;; (wdt/update-create-token reference-border-radius-token)]] -;; (tohs/run-store-async -;; store done events -;; (fn [new-state] -;; (let [selected-token-set (wtts/get-selected-token-set new-state) -;; file' (ths/get-file-from-store new-state) -;; set-tokens (wtts/get-selected-token-set-tokens file')] -;; (t/testing "selects created workspace set and adds token to it" -;; (t/is (some? selected-token-set)) -;; (t/is (= 2 (count (:tokens selected-token-set)))) -;; (t/is (= (list border-radius-token reference-border-radius-token) (map #(dissoc % :id :modified-at) set-tokens))))))))))) +(t/deftest test-create-multiple-tokens + (t/testing "uses selected tokens set when creating multiple tokens" + (t/async + done + (let [file (setup-file) + store (ths/setup-store file) + events [(wdt/update-create-token border-radius-token) + (wdt/update-create-token reference-border-radius-token)]] + (tohs/run-store-async + store done events + (fn [new-state] + (let [set-tokens (wtts/get-active-theme-sets-tokens-names-map new-state)] + (t/testing "selects created workspace set and adds token to it" + (t/is (= 2 (count set-tokens))) + (t/is (= (list border-radius-token reference-border-radius-token) + (->> (vals set-tokens) + (map #(dissoc % :id :modified-at))))))))))))) (t/deftest test-apply-token (t/testing "applies token to shape and updates shape attributes to resolved value"