added suggestions
This commit is contained in:
@@ -85,12 +85,3 @@
|
||||
:args [(d/db (d/connect uri)) code]}))
|
||||
(first)
|
||||
(first)))
|
||||
|
||||
(defn assoc-image [code image]
|
||||
@(d/transact (d/connect uri)
|
||||
[{ :client/code code
|
||||
:client/signature-file (str "https://s3.amazonaws.com/integreat-signature-images/" image)}]))
|
||||
|
||||
|
||||
#_(d/pull (d/db (d/connect uri)) '[*] [:client/code "FTLO"])
|
||||
#_(assoc-image "FTLO" "Fratello.jpg" )
|
||||
|
||||
Reference in New Issue
Block a user