devxy/build-cran-binaries
Watch
1
0
Fork
You've already forked build-cran-binaries
 0
Code Issues 10 Pull requests Releases Activity

don't index package_name as list

Browse source
This commit is contained in:
Patrick Schratz 2024-09-23 15:10:13 +02:00
commit c0b8fd67f9
Signed by: pat-s
GPG key ID: 3C6318841EF78925
1 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
R/build_binaries.R
View file

@ -81,7 +81,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
t1 <- Sys.time()
cli::cli_h2("Building ({.pkg {package_name[1]}})")
cli::cli_alert("[{format(Sys.time(), format='%H:%M:%S')}] Building binaries for {.pkg {package_name[[1]]}} with tags {.field {tag}}.")
cli::cli_alert("[{format(Sys.time(), format='%H:%M:%S')}] Building binaries for {.pkg {package_name[1]}} with tags {.field {tag}}.")
future::plan(future_strategy,
workers = future_workers,
@ -125,7 +125,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
)
total_build_time <- round(Sys.time() - t1, 2)
cli::cli_alert("Execution time ({.pkg {package_name[[1]]}}) ({length(tag)} tags): {.strong {total_build_time} {units(difftime(Sys.time(), t1))}}.")
cli::cli_alert("Execution time ({.pkg {package_name[1]}}) ({length(tag)} tags): {.strong {total_build_time} {units(difftime(Sys.time(), t1))}}.")
cli::cli_h2("Uploading ({.pkg {package_name[1]}})")
# out <- progressr::with_progress({
@ -145,7 +145,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
})
if (archive) {
archive_package(package_name[[1]])
archive_package(package_name[1])
}
return(invisible(TRUE))
}