add bto
This commit is contained in:
parent
9297f8092f
commit
ec20d3d575
2 changed files with 9 additions and 1 deletions
|
@ -14,7 +14,7 @@
|
||||||
(s/def ::Object
|
(s/def ::Object
|
||||||
(s/and
|
(s/and
|
||||||
::owl/Class
|
::owl/Class
|
||||||
(sh/map-spec (s/keys :opt-un [::id ::type ::attachment ::bcc]))))
|
(sh/map-spec (s/keys :opt-un [::id ::type ::attachment ::bcc ::bto]))))
|
||||||
|
|
||||||
;http://www.w3.org/ns/activitystreams#Link
|
;http://www.w3.org/ns/activitystreams#Link
|
||||||
;TODO: definition in progress
|
;TODO: definition in progress
|
||||||
|
@ -67,6 +67,12 @@
|
||||||
::Object
|
::Object
|
||||||
::Link))
|
::Link))
|
||||||
|
|
||||||
|
;http://www.w3.org/ns/activitystreams#bto
|
||||||
|
(s/def ::bto
|
||||||
|
(s/and ::owl/ObjectProperty
|
||||||
|
::Object
|
||||||
|
::Link))
|
||||||
|
|
||||||
;https://www.w3.org/TR/activitystreams-vocabulary/#dfn-type
|
;https://www.w3.org/TR/activitystreams-vocabulary/#dfn-type
|
||||||
;TODO: this can not be found in the ttl / namespace. Where is this exactly defined?
|
;TODO: this can not be found in the ttl / namespace. Where is this exactly defined?
|
||||||
(s/def ::type
|
(s/def ::type
|
||||||
|
|
|
@ -48,6 +48,8 @@
|
||||||
(deftest bcc-test
|
(deftest bcc-test
|
||||||
(is (s/valid? ::sut/bcc ["http://joe.example.org"])))
|
(is (s/valid? ::sut/bcc ["http://joe.example.org"])))
|
||||||
|
|
||||||
|
(deftest bto-test
|
||||||
|
(is (s/valid? ::sut/bto ["http://joe.example.org"])))
|
||||||
|
|
||||||
(deftest Activity-test
|
(deftest Activity-test
|
||||||
(is (s/valid? ::sut/Activity
|
(is (s/valid? ::sut/Activity
|
||||||
|
|
Loading…
Reference in a new issue