diff --git a/src/clj/auto_ap/db/users.clj b/src/clj/auto_ap/db/users.clj index 3a01bacc..4d84899d 100644 --- a/src/clj/auto_ap/db/users.clj +++ b/src/clj/auto_ap/db/users.clj @@ -7,6 +7,17 @@ (let [user (first (j/find-by-keys (get-conn) :users {:provider_id (:provider_id row) - :provider (:provider row)}))] - (when user - (merge user (edn/read-string (:data user "{}")))))) + :provider (:provider row)})) + ] + (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 "{}"}) + )))