#156 tests

eblondel · May 24, 2024 · 3c45c04 · 3c45c04
1 parent 145060d
commit 3c45c04
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/tests/testthat/test_communities.R b/tests/testthat/test_communities.R
@@ -41,4 +41,7 @@ test_that("record is submitted to a community, with cancel and review actions (d
   #submit again (new review)
   req = ZENODO$submitRecordToCommunities(record = rec, communities = "openfair", message = "zen4R supports FAIR principles")
   accepted = ZENODO$acceptRequest(req$processed[[1]]$request_id, message = "Thank you, welcome to the Open FAIR community")
+  #get record communities
+  req_coms = ZENODO$getRecordCommunities(record = rec)
+  expect_true(length(req_coms)>0)
 })