|
|
|
@ -2,7 +2,6 @@
|
|
|
|
|
(:require [clojure.spec.alpha :as s]
|
|
|
|
|
[orchestra.core :refer [defn-spec]]
|
|
|
|
|
[org.domaindrivenarchitecture.fed-poc.spec-helper :as sh]
|
|
|
|
|
[org.domaindrivenarchitecture.fed-poc.owl :as owl]
|
|
|
|
|
[org.domaindrivenarchitecture.fed-poc.activitystreams2 :as as]
|
|
|
|
|
[org.domaindrivenarchitecture.fed-poc.xsd :as xsd]
|
|
|
|
|
[org.domaindrivenarchitecture.fed-poc.activitystreams2 :as as]))
|
|
|
|
@ -18,13 +17,13 @@
|
|
|
|
|
(s/def ::Star
|
|
|
|
|
(s/merge
|
|
|
|
|
::as/Activity
|
|
|
|
|
(sh/map-spec (s/keys :opt [::flavor]))))
|
|
|
|
|
(sh/map-spec (s/keys :opt [::source]))))
|
|
|
|
|
|
|
|
|
|
;https://forgefed.org/ns#Unstar
|
|
|
|
|
(s/def ::Unstar
|
|
|
|
|
(s/merge
|
|
|
|
|
::as/Activity
|
|
|
|
|
(sh/map-spec (s/keys :opt [::flavor]))))
|
|
|
|
|
(sh/map-spec (s/keys :opt [::source]))))
|
|
|
|
|
|
|
|
|
|
(s/def ::flavor
|
|
|
|
|
(s/def ::source
|
|
|
|
|
(sh/seq-spec ::xsd/anyURI))
|