notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

editing users uses datomic.

Browse Source
This commit is contained in:
BC
2018-09-20 23:17:45 -07:00
parent ebb9a191f1
commit 4a237a8224
8 changed files with 63 additions and 99 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/clj/auto_ap/datomic.clj
View File

@@ -517,10 +517,10 @@
:db/valueType :db.type/string
:db/cardinality :db.cardinality/one
:db/doc "name of the user"}
{:db/ident :user/companies
{:db/ident :user/clients
:db/valueType :db.type/ref
:db/cardinality :db.cardinality/many
:db/doc "The companies this user can view"}
:db/doc "The clients this user can view"}
;;enums
{:db/ident :user-role/admin}
@@ -706,7 +706,7 @@
:role (keyword "user-role" role)
:provider-id provider-id
:provider provider
:companies (map (fn [c] [:client/original-id c]) companies)})))
:clients (map (fn [c] [:client/original-id c]) companies)})))
(d/transact (d/connect uri))))
(defn query-vendors []