From a7e735bd816e09f336b2f503bbda730fee67dca2 Mon Sep 17 00:00:00 2001 From: Florian Schroedl Date: Wed, 3 Jul 2024 17:04:47 +0200 Subject: [PATCH] Add helper for asnc stores --- frontend/test/token_tests/helpers/state.cljs | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/frontend/test/token_tests/helpers/state.cljs b/frontend/test/token_tests/helpers/state.cljs index 07d9fe0bf..40fee3c49 100644 --- a/frontend/test/token_tests/helpers/state.cljs +++ b/frontend/test/token_tests/helpers/state.cljs @@ -10,9 +10,13 @@ [event-type] (fn [stream] (->> stream - (rx/tap #(prn (ptk/type %))) + #_(rx/tap #(prn (ptk/type %))) (rx/filter #(ptk/type? event-type %))))) +(def stop-on-send-update-indices + "Stops on `send-update-indices` function being called, which should be the last function of an event chain." + (stop-on :app.main.data.workspace.changes/send-update-indices)) + ;; Support for async events in tests ;; https://chat.kaleidos.net/penpot-partners/pl/tz1yoes3w3fr9qanxqpuhoz3ch (defn run-store @@ -36,3 +40,10 @@ (doall (for [event events] (ptk/emit! store event))) (ptk/emit! store :the/end)))) + +(defn run-store-async + "Helper version of `run-store` that automatically stops on the `send-update-indices` event" + ([store done events completed-cb] + (run-store store done events completed-cb stop-on-send-update-indices)) + ([store done events completed-cb stop-on] + (run-store store done events completed-cb stop-on)))