process all package updates since build start

This commit is contained in:
Patrick Schratz 2024-08-28 18:38:25 +02:00
commit d4d95e1a4a
Signed by: pat-s
GPG key ID: 3C6318841EF78925

View file

@ -31,7 +31,7 @@ process_cran_updates <- function(
all_pkgs <- dplyr::bind_rows(updated_pkgs, new_pkgs)
# purrr::walk2(all_pkgs$name, all_pkgs$version, ~ build_binary_package(.x, .y, platform = platform))
purrr::walk2(all_pkgs$name, all_pkgs$version, ~ build_binary_package(.x, .y, platform = platform))
if (prune) {
removed_pkgs <- get_removed_cran_packages(interval)
@ -60,11 +60,10 @@ process_cran_updates <- function(
files_filtered <- grep(sprintf("%s_", .x), files, value = TRUE)
if (length(files_filtered > 0)) {
s3fs::s3_file_delete(files_filtered)
cli::cli_alert_success("{.fun process_cran_updates}: Successfully removed {.pkg {basename(files_filtered)}} from S3.")
} else {
cli::cli_alert("{.fun process_cran_updates}: No tarballs found for package {.pkg {.x}} - already removed?")
}
cli::cli_alert_success("{.fun process_cran_updates}: Successfully removed {.pkg {basename(files_filtered)}} from S3.")
})
}
}