R/Rpacman
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed custom remote install

Browse Source
This commit is contained in:
Craig Williams
2023-09-28 10:46:47 +01:00
parent b776fc7019
commit 78c602f5f0
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
DESCRIPTION
View File

@@ -1,7 +1,7 @@
Package: Rpacman Package: Rpacman
Type: Package Type: Package
Title: Very simple package manager for R Title: Very simple package manager for R
Version: 1.0.3 Version: 1.0.4
Date: 2022-05-31 Date: 2022-05-31
Authors@R: person("Craig", "Williams", email = "craig@avsdev.uk", role = c("aut", "cre")) Authors@R: person("Craig", "Williams", email = "craig@avsdev.uk", role = c("aut", "cre"))
URL: https://avsdev.uk/R/Rpacman URL: https://avsdev.uk/R/Rpacman

6
R/install_package_source.R
View File

@@ -10,12 +10,12 @@
#' @export #' @export
install_package_source <- function(packageSource, installOpts = list(Ncpus = parallel::detectCores())) { install_package_source <- function(packageSource, installOpts = list(Ncpus = parallel::detectCores())) {
packageRemote <- switch( packageRemote <- switch(
packageSource$type, unlist(packageSource$type),
git_url = remotes:::git_remote(packageSource$src, ref = packageSource$ref), git_url = remotes:::git_remote(packageSource$src, ref = packageSource$ref),
github = remotes:::github_remote(packageSource$src, ref = packageSource$ref), github = remotes:::github_remote(packageSource$src, ref = packageSource$ref),
gitlab = remotes:::gitlab_remote(packageSource$src), gitlab = remotes:::gitlab_remote(packageSource$src),
svn = remotes:::svn_remote(packageSource$src, revision = packageSource$ref), svn = remotes:::svn_remote(packageSource$src, revision = packageSource$ref),
bitbucket = remotes:::bitbucket_remote(packageSource$src, ref = packageSource$ef), bitbucket = remotes:::bitbucket_remote(packageSource$src, ref = packageSource$ref),
Bioconductor = remotes:::bio_remote(packageSource$src) Bioconductor = remotes:::bio_remote(packageSource$src)
) )
@@ -23,7 +23,7 @@ install_package_source <- function(packageSource, installOpts = list(Ncpus = par
force = FALSE, quiet = FALSE, build = TRUE, build_opts = c("--no-resave-data", "--no-manual", force = FALSE, quiet = FALSE, build = TRUE, build_opts = c("--no-resave-data", "--no-manual",
"--no-build-vignettes"), "--no-build-vignettes"),
build_manual = FALSE, build_vignettes = FALSE, build_manual = FALSE, build_vignettes = FALSE,
repos = getOption("repos"), type = getOption("pkgType"), installOpts) repos = getOption("repos"), type = getOption("pkgType"))
allPackages <- utils::installed.packages() allPackages <- utils::installed.packages()
allPackages <- as.data.frame(allPackages) allPackages <- as.data.frame(allPackages)