From aad70d9df89a98f6a2cd146be74b7bf24ece66e3 Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Wed, 5 Jul 2023 16:49:43 +0200 Subject: [PATCH] :lipstick: Add minor cosmetic improvement to viewer events ns --- frontend/src/app/main/data/viewer.cljs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/frontend/src/app/main/data/viewer.cljs b/frontend/src/app/main/data/viewer.cljs index a440c774c..f4675beaa 100644 --- a/frontend/src/app/main/data/viewer.cljs +++ b/frontend/src/app/main/data/viewer.cljs @@ -98,9 +98,13 @@ [:file-id ::sm/uuid] [:share-id {:optional true} ::sm/uuid]]) +(def ^:private valid-fetch-bundle-params? + (sm/pred-fn schema:fetch-bundle)) + (defn- fetch-bundle [{:keys [file-id share-id] :as params}] - (dm/assert! (sm/valid? schema:fetch-bundle params)) + (dm/assert! (valid-fetch-bundle-params? params)) + (ptk/reify ::fetch-bundle ptk/WatchEvent (watch [_ state _]