feat: Use compute_codecov() in inflate() and inflate_all()

#256
ThinkR-open · Jun 17, 2024 · f29d4e2 · f29d4e2
1 parent 4a9be86
commit f29d4e2
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 15 deletions.
diff --git a/R/inflate.R b/R/inflate.R
@@ -368,15 +368,7 @@ inflate <- function(pkg = ".", flat_file,
 
   if (codecov) {
     cli::cli_alert_info("Computing code coverage - it might take some time")
-    on_windows <- grepl("windows", tolower(osVersion))
-    if (on_windows) {
-      # On windows, package_coverage() will fail
-      # if called right alfer a pkgload::load_all()
-      pkgload::unload(pkg)
-    }
-    print(
-      covr::package_coverage()
-    )
+    compute_codecov(pkg = pkg)
   }
 
   # Restart RStudio

diff --git a/R/inflate_all.R b/R/inflate_all.R
@@ -207,9 +207,7 @@ inflate_all <- function(
 
   if (codecov) {
     cli::cli_alert_info("Computing code coverage - it might take some time")
-    print(
-      covr::package_coverage()
-    )
+    compute_codecov(pkg = pkg)
   }
 
   invisible(pkg)

diff --git a/dev/flat_inflate_all.Rmd b/dev/flat_inflate_all.Rmd
@@ -209,9 +209,7 @@ inflate_all <- function(
 
   if (codecov) {
     cli::cli_alert_info("Computing code coverage - it might take some time")
-    print(
-      covr::package_coverage()
-    )
+    compute_codecov(pkg = pkg)
   }
 
   invisible(pkg)