diff --git a/src/clj/auto_ap/datomic/clients.clj b/src/clj/auto_ap/datomic/clients.clj index d82d8cb0..0eb7aecb 100644 --- a/src/clj/auto_ap/datomic/clients.clj +++ b/src/clj/auto_ap/datomic/clients.clj @@ -29,3 +29,12 @@ #_(map 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" )