3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-02 20:31:39 +02:00
Code Issues Projects Releases Packages Wiki Activity

♻️ Simplify internal implementation of sm/schema namespace

Browse source
This commit is contained in:
Andrey Antukh 2024-09-10 17:50:01 +02:00 • committed by Alonso Torres
parent b882b9e283
commit 9e94cf7b99
3 changed files with 41 additions and 91 deletions
Download patch file Download diff file Expand all files Collapse all files

10
backend/src/app/http/websocket.clj
View file

@ -282,9 +282,17 @@
[:map {:title "params"}
[:session-id ::sm/uuid]])
(def ^:private decode-params
(sm/decoder schema:params sm/json-transformer))
(def ^:private validate-params!
(sm/validate-fn schema:params))
(defn- http-handler
[cfg {:keys [params ::session/profile-id] :as request}]
(let [{:keys [session-id]} (sm/conform! schema:params params)]
(let [{:keys [session-id]} (-> params
decode-params
validate-params!)]
(cond
(not profile-id)
(ex/raise :type :authentication