Merge pull request #21 from r-multiverse/test

Fix/optimize testing

DESCRIPTION

@@ -1,6 +1,7 @@
 Package: multiverse.internals
 Title: Internal Infrastructure for R-multiverse
-Description: Internal Infrastructure for R-multiverse
+Description: R-multiverse requires this internal internal infrastructure
+  package to automate contribution reviews and populate universes.
 Version: 0.1.0
 License: MIT + file LICENSE
 URL: https://github.com/r-multiverse/multiverse.internals

tests/testthat/test-assert_package.R

@@ -171,11 +171,13 @@ test_that("good GitHub registration", {
 })
 
 test_that("good GitLab registration", {
-  suppressMessages(
-    expect_null(
-      assert_package(
-        name = "test",
-        url = "https://gitlab.com/wlandau/test"
+  tmp <- utils::capture.output(
+    suppressMessages(
+      expect_null(
+        assert_package(
+          name = "test",
+          url = "https://gitlab.com/wlandau/test"
+        )
       )
     )
   )

tests/testthat/test-record_versions.R

@@ -157,14 +157,15 @@ test_that("record versions from a mock repo", {
   unlink(c(manifest, issues))
 })
 
-test_that("manifest can be created and updated from the actual repo", {
+test_that("manifest can be created and updated from an actual repo", {
   manifest <- tempfile()
   issues <- tempfile()
   temp <- utils::capture.output(
     suppressMessages(
       record_versions(
         manifest = manifest,
-        issues = issues
+        issues = issues,
+        repo = "https://wlandau.r-universe.dev"
       )
     )
   )
@@ -176,7 +177,8 @@ test_that("manifest can be created and updated from the actual repo", {
     suppressMessages(
       record_versions(
         manifest = manifest,
-        issues = issues
+        issues = issues,
+        repo = "https://wlandau.r-universe.dev"
       )
     )
   )