suppress warning when package is not installed for .hasPkg

Bioconductor · Feb 19, 2025 · 1b3de7c · 1b3de7c
1 parent 858f60a
commit 1b3de7c
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/R/checks.R b/R/checks.R
@@ -69,7 +69,11 @@ checkPackageSize <- function(.BiocPackage, size=5){
 
 .in_data <- function(f) { f %in% .DATA_DIRS }
 
-.hasPkg <- function(pkg) nzchar(system.file(package = pkg))
+.hasPkg <- function(pkg) {
+    suppressWarnings({
+        nzchar(system.file(package = pkg))
+    })
+}
 
 .findLargeFiles <- function(.BiocPackage, data_only) {
     pkgdir <- .BiocPackage$sourceDir