meissa/activity-pub-poc
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Implement simple test

Browse source
This commit is contained in:
erik 2023-06-22 15:45:38 +02:00
parent cc641bfe7f
commit 4bf90ae278
1 changed files with 19 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
src/test/clj/org/domaindrivenarchitecture/activity_pub_poc/core_test.clj
View file

@ -1,6 +1,21 @@
(ns org.domaindrivenarchitecture.activity-pub-poc.core-test (ns org.domaindrivenarchitecture.activity-pub-poc.core-test
(:require [clojure.test :refer :all] (:require
[clojure.test :refer [deftest is are testing run-tests]]
[clojure.spec.test.alpha :as st]
[org.domaindrivenarchitecture.activity-pub-poc.core :as sut])) [org.domaindrivenarchitecture.activity-pub-poc.core :as sut]))
(deftest get-property-type-from-ld-resource (st/instrument `sut/generate-like-map)
(is (= 0 1)))
(def test-like-data
{:to "https://chatty.bla/ben/"
:target "posts/234s23-2g34234-2hhj536"
:from "https://social.bla/alyssa/"})
(deftest produces-valid-like
(is (= {"@context" "https://www.w3.org/ns/activitystreams",
"type" "Like",
"id" "https://social.bla/alyssa/out/sdfsd44243g324g3455",
"to" "https://chatty.bla/ben/",
"actor" "https://social.bla/alyssa/",
"object" "posts/234s23-2g34234-2hhj536"}
(sut/generate-like-map test-like-data))))