non working id test

This commit is contained in:
Michael Jerger 2023-07-28 12:04:57 +02:00
parent 19b050f517
commit 26fac9b467
2 changed files with 3 additions and 9 deletions

View file

@ -1,7 +0,0 @@
(ns org.domaindrivenarchitecture.activity-pub-poc.xsd
(:require [clojure.spec.alpha :as s]))
; http://www.datypic.com/sc/xsd/t-xsd_anyURI.html
; TODO: Find out correct definition!
(defn anyUri? [input]
false)

View file

@ -65,8 +65,9 @@
;Answer jem: I do not want to enhance owl/Class inline from here.
(s/def
::Class
(s/merge ::owl/Class
(s/keys :opt-un [::id ::object])))
(s/and ::owl/Class
))
;(s/keys :opt-un [::id ::object])))
;http://www.w3.org/ns/activitystreams#Like