Tweak to how restore builds source packages
This commit is contained in:
@@ -8,7 +8,7 @@
|
||||
#' @return invisible return of the current snapshot
|
||||
#' @import parallel remotes
|
||||
#' @export
|
||||
install_package_source <- function(packageSource, installOpts = list(Ncpus = parallel::detectCores())) {
|
||||
install_package_source <- function(packageSource, installOpts = list(Ncpus = parallel::detectCores()), dependencies = "hard") {
|
||||
type <- unlist(packageSource$type)
|
||||
src <- unlist(packageSource$src)
|
||||
ref <- unlist(packageSource$ref)
|
||||
@@ -23,7 +23,7 @@ install_package_source <- function(packageSource, installOpts = list(Ncpus = par
|
||||
Bioconductor = remotes:::bio_remote(src)
|
||||
)
|
||||
|
||||
remotes:::install_remote(packageRemote, dependencies = NA, upgrade = "never",
|
||||
remotes:::install_remote(packageRemote, dependencies = dependencies, upgrade = "never",
|
||||
force = FALSE, quiet = FALSE, build = TRUE, build_opts = c("--no-resave-data", "--no-manual",
|
||||
"--no-build-vignettes"),
|
||||
build_manual = FALSE, build_vignettes = FALSE,
|
||||
|
||||
@@ -104,7 +104,7 @@ restore <- function(totalIsolation = FALSE, lib_path = NULL, installOpts = list(
|
||||
|
||||
groupCustomPackages <- customPackages[customPackages$package %in% installGroup,]
|
||||
lapply(seq_along(groupCustomPackages$package), function(pkgIdx) {
|
||||
install_package_source(groupCustomPackages[pkgIdx,], installOpts)
|
||||
install_package_source(groupCustomPackages[pkgIdx,], installOpts, dependencies = FALSE)
|
||||
})
|
||||
|
||||
groupPackages <- simplePackages[simplePackages$package %in% installGroup,]
|
||||
|
||||
Reference in New Issue
Block a user