diff --git a/R/guess_other_metadata.R b/R/guess_other_metadata.R index 2b15fbc6..d23fa02c 100644 --- a/R/guess_other_metadata.R +++ b/R/guess_other_metadata.R @@ -32,10 +32,16 @@ guess_fileSize <- function(root = ".") { return(NULL) } else { f <- - pkgbuild::build(root, + try(pkgbuild::build(root, vignettes = FALSE, manual = FALSE, - quiet = TRUE) - paste0(file.size(f) / 1e3, "KB") + quiet = TRUE), + silent = TRUE) + if(inherits(f, "try-error")){ + return(NULL) + }else{ + return(paste0(file.size(f) / 1e3, "KB")) + } + } }