remove unused as:Class

pull/1/head
Michael Jerger 10 months ago
parent d572a8c05e
commit 077a50e733

@ -13,14 +13,6 @@
;=======================
;TODO: There is no as:Class! Why do we need this?
;Answer jem: I do not want to enhance owl/Class inline from here.
(s/def
::Class
(s/and ::owl/Class))
;=======================
;http://www.w3.org/ns/activitystreams#object
(s/def ::Object
(s/and

@ -25,9 +25,6 @@
:summary "A simple note",
:content "That is a tree."}])))
(deftest class-test
(is (s/valid? ::sut/Class "https://social.bla/alyssa/status/RANDOMHASH")))
(deftest result-test
(is (s/valid? ::sut/result "https://social.bla/alyssa/result/RANDOMHASH"))
(is (s/valid? ::sut/result {:type "http://www.types.example/flightstatus", :name "On Time"}))

@ -19,3 +19,7 @@
(is (sut/owl-class? []))
(is (not (sut/owl-class? "str")))
(is (not (sut/owl-class? nil))))
(deftest class-test
(is (s/valid? ::sut/Class "https://social.bla/alyssa/status/RANDOMHASH"))
(is (s/valid? ::sut/Class {})))

Loading…
Cancel
Save