Compare commits
3 commits
92770f4eb2
...
d50a2cf5dc
Author | SHA1 | Date | |
---|---|---|---|
d50a2cf5dc | |||
28a0f4f315 | |||
84ae5642bb |
3 changed files with 17 additions and 1 deletions
1
.gitignore
vendored
1
.gitignore
vendored
|
@ -15,3 +15,4 @@ pom.xml.asc
|
|||
.clj-kondo/metosin/
|
||||
.lsp/.cache/
|
||||
.calva
|
||||
.idea
|
|
@ -20,6 +20,7 @@
|
|||
"Relationship"
|
||||
"Tombstone"
|
||||
"Video"
|
||||
"Link"
|
||||
; Link Types
|
||||
"Mention"})
|
||||
|
||||
|
|
|
@ -5,6 +5,20 @@
|
|||
[clojure.spec.alpha :as s]
|
||||
[org.domaindrivenarchitecture.activity-pub-poc.activitystreams2-legacy :as sut]))
|
||||
|
||||
;(deftest id-test
|
||||
; (is (s/valid? ::sut/id "https://social.bla/alyssa/status/RANDOMHASH")))
|
||||
|
||||
;(deftest type-test
|
||||
; (is (s/valid? ::sut/type "Note"))
|
||||
; (is (s/valid? ::sut/type "Link"))
|
||||
; (is (not(s/valid? ::sut/type "non existing"))))
|
||||
|
||||
;(deftest object-test
|
||||
; (is (s/valid? ::sut/Object "https://social.bla/alyssa/status/RANDOMHASH")
|
||||
; (is (s/valid? ::sut/Object {:id "https://social.bla/alyssa/status/RANDOMHASH" :type "Page"}))))
|
||||
;
|
||||
;(deftest link-test
|
||||
; (is (s/valid? ::sut/Link {:type "Link"})))
|
||||
|
||||
;(deftest Note-test
|
||||
; (is (s/valid?
|
||||
|
|
Loading…
Reference in a new issue