add user if they don't exist.
This commit is contained in:
@@ -7,6 +7,17 @@
|
|||||||
(let [user (first (j/find-by-keys (get-conn)
|
(let [user (first (j/find-by-keys (get-conn)
|
||||||
:users
|
:users
|
||||||
{:provider_id (:provider_id row)
|
{:provider_id (:provider_id row)
|
||||||
:provider (:provider row)}))]
|
:provider (:provider row)}))
|
||||||
(when user
|
]
|
||||||
(merge user (edn/read-string (:data user "{}"))))))
|
(if user
|
||||||
|
(merge user (edn/read-string (:data user "{}")))
|
||||||
|
(do
|
||||||
|
(j/insert! (get-conn)
|
||||||
|
:users
|
||||||
|
{:provider_id (:provider_id row)
|
||||||
|
:provider (:provider row)
|
||||||
|
:data "{}"})
|
||||||
|
{:provider_id (:provider_id row)
|
||||||
|
:provider (:provider row)
|
||||||
|
:data "{}"})
|
||||||
|
)))
|
||||||
|
|||||||
Reference in New Issue
Block a user