Compare commits

..

No commits in common. "3dd9ff8ed00e41f48412fac5fee88f38281cd8b5" and "b71bfb43b70a8cf655429ed8529e070ca762a6b9" have entirely different histories.

6 changed files with 1 additions and 15 deletions
firstpage.jsonnote.jsonoutbox-first.jsonoutbox-last.json
src
main/cljc/org/domaindrivenarchitecture/activity_pub_poc
test/cljc/org/domaindrivenarchitecture/activity_pub_poc

View file

@ -88,9 +88,7 @@
;https://www.w3.org/TR/activitystreams-vocabulary/#dfn-type
;TODO: this can not be found in the ttl / namespace. Where is this exactly defined?
(s/def ::type
(s/or
:single-value ::xsd/anyURI
:coll-of-values (s/+ ::xsd/anyURI)))
::xsd/anyURI)
;http://www.w3.org/ns/activitystreams#result
(s/def ::result

View file

@ -12,18 +12,6 @@
(is (not (s/valid? ::sut/id "https://no-uri:abc")))
(is (not (s/valid? ::sut/id ["https://social.bla/alyssa/status/RANDOMHASH", "https://social.bla/alyssa/status/RANDOMHASH2"]))))
(deftest type-test
(is (s/valid? ::sut/type "https://social.bla/alyssa/status/RANDOMHASH"))
(is (s/valid? ::sut/type "Activity"))
(is (s/valid? ::sut/type "Activity"))
(is (s/valid? ::sut/type ["https://social.bla/alyssa/status/RANDOMHASH", "https://social.bla/alyssa/status/RANDOMHASH2"]))
(is (not (s/valid? ::sut/type nil)))
(is (not (s/valid? ::sut/type [])))
(is (not (s/valid? ::sut/type 2)))
(is (not (s/valid? ::sut/type "https://no-uri:abc")))
)
(deftest object-test
(is (s/valid? ::sut/object "http://example.org/posts/1"))
(is (s/valid? ::sut/object {:type "Note",