mirror of
https://github.com/penpot/penpot.git
synced 2025-06-09 16:21:40 +02:00
✨ Add the abiltiy to forward command params as query-string
This commit is contained in:
parent
5026bfa6c1
commit
8fb62628d2
1 changed files with 14 additions and 3 deletions
|
@ -97,7 +97,7 @@
|
||||||
(defn- send-command!
|
(defn- send-command!
|
||||||
"A simple helper for a common case of sending and receiving transit
|
"A simple helper for a common case of sending and receiving transit
|
||||||
data to the penpot mutation api."
|
data to the penpot mutation api."
|
||||||
[id params {:keys [response-type form-data? raw-transit?]}]
|
[id params {:keys [response-type form-data? raw-transit? forward-query-params]}]
|
||||||
(let [decode-fn (if raw-transit?
|
(let [decode-fn (if raw-transit?
|
||||||
http/conditional-error-decode-transit
|
http/conditional-error-decode-transit
|
||||||
http/conditional-decode-transit)
|
http/conditional-decode-transit)
|
||||||
|
@ -111,8 +111,11 @@
|
||||||
(if form-data?
|
(if form-data?
|
||||||
(http/form-data params)
|
(http/form-data params)
|
||||||
(http/transit-data params)))
|
(http/transit-data params)))
|
||||||
:query (when (= method :get)
|
:query (if (= method :get)
|
||||||
params)
|
params
|
||||||
|
(if forward-query-params
|
||||||
|
(select-keys params forward-query-params)
|
||||||
|
nil))
|
||||||
:response-type (or response-type :text)})
|
:response-type (or response-type :text)})
|
||||||
(rx/map decode-fn)
|
(rx/map decode-fn)
|
||||||
(rx/mapcat handle-response))))
|
(rx/mapcat handle-response))))
|
||||||
|
@ -139,6 +142,14 @@
|
||||||
[id params]
|
[id params]
|
||||||
(send-command! id params nil))
|
(send-command! id params nil))
|
||||||
|
|
||||||
|
(defmethod command :update-file
|
||||||
|
[id params]
|
||||||
|
(send-command! id params {:forward-query-params [:id]}))
|
||||||
|
|
||||||
|
(defmethod command :upsert-file-object-thumbnail
|
||||||
|
[id params]
|
||||||
|
(send-command! id params {:forward-query-params [:file-id :object-id]}))
|
||||||
|
|
||||||
(defmethod command :export-binfile
|
(defmethod command :export-binfile
|
||||||
[id params]
|
[id params]
|
||||||
(send-command! id params {:response-type :blob}))
|
(send-command! id params {:response-type :blob}))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue