|
|
@ -4,16 +4,14 @@
|
|
|
|
[wanijo.framework.neo4j :as neo4j]))
|
|
|
|
[wanijo.framework.neo4j :as neo4j]))
|
|
|
|
|
|
|
|
|
|
|
|
(spec/def ::name
|
|
|
|
(spec/def ::name
|
|
|
|
(spec/and string? not-empty))
|
|
|
|
(spec/and ::specs/name (complement empty?)))
|
|
|
|
(spec/def ::created-at
|
|
|
|
|
|
|
|
(spec/and string? ::neo4j/date-str))
|
|
|
|
|
|
|
|
(spec/def ::assigned-to
|
|
|
|
(spec/def ::assigned-to
|
|
|
|
(spec/or :public empty?
|
|
|
|
(spec/or :public empty?
|
|
|
|
:assigned (spec/coll-of ::neo4j/uuid)
|
|
|
|
:assigned (spec/coll-of ::neo4j/uuid)
|
|
|
|
:assigned-single ::neo4j/uuid))
|
|
|
|
:assigned-single ::neo4j/uuid))
|
|
|
|
(spec/def ::schema
|
|
|
|
(spec/def ::schema
|
|
|
|
(spec/keys ::req-un [::name
|
|
|
|
(spec/keys ::req-un [::name
|
|
|
|
::created-at
|
|
|
|
::specs/created-at
|
|
|
|
::neo4j/uuid]))
|
|
|
|
::neo4j/uuid]))
|
|
|
|
|
|
|
|
|
|
|
|
(neo4j/defquery all-created-by
|
|
|
|
(neo4j/defquery all-created-by
|
|
|
|