|
|
@ -96,11 +96,11 @@
|
|
|
|
-[:permission {type:{type}}]-
|
|
|
|
-[:permission {type:{type}}]-
|
|
|
|
(s)) AS is_public")
|
|
|
|
(s)) AS is_public")
|
|
|
|
|
|
|
|
|
|
|
|
(defn has-user-permission? [type schema-uuid user-uuid]
|
|
|
|
(defn has-user-permission? [perm-type schema-uuid user-uuid]
|
|
|
|
(let [permissions (first (neo4j/exec-query! schema-permissions
|
|
|
|
(let [permissions (first (neo4j/exec-query! schema-permissions
|
|
|
|
{:schema_uuid schema-uuid
|
|
|
|
{:schema_uuid schema-uuid
|
|
|
|
:user_uuid user-uuid
|
|
|
|
:user_uuid user-uuid
|
|
|
|
:type type}))
|
|
|
|
:type perm-type}))
|
|
|
|
public? (neo4j/bool (:is_public permissions))
|
|
|
|
public? (neo4j/bool (:is_public permissions))
|
|
|
|
user? (neo4j/bool (:user_has_permission permissions))]
|
|
|
|
user? (neo4j/bool (:user_has_permission permissions))]
|
|
|
|
(or public? user?)))
|
|
|
|
(or public? user?)))
|
|
|
|