|
|
@ -101,8 +101,8 @@
|
|
|
|
{:schema_uuid schema-uuid
|
|
|
|
{:schema_uuid schema-uuid
|
|
|
|
:user_uuid user-uuid
|
|
|
|
:user_uuid user-uuid
|
|
|
|
:type perm-type}))
|
|
|
|
:type perm-type}))
|
|
|
|
public? (neo4j/bool (:is_public permissions))
|
|
|
|
public? (:is_public permissions)
|
|
|
|
user? (neo4j/bool (:user_has_permission permissions))]
|
|
|
|
user? (:user_has_permission permissions)]
|
|
|
|
(or public? user?)))
|
|
|
|
(or public? user?)))
|
|
|
|
|
|
|
|
|
|
|
|
(defn has-user-write-permissions? [schema-uuid user-uuid]
|
|
|
|
(defn has-user-write-permissions? [schema-uuid user-uuid]
|
|
|
|