improve archiging log output

This commit is contained in:
Patrick Schratz 2024-09-08 16:37:14 +02:00
commit 26bb9d3b33
Signed by: pat-s
GPG key ID: 3C6318841EF78925

View file

@ -41,7 +41,7 @@ archive_package <- function(
files <- s3fs::s3_dir_ls(remote_bin_dir)
foo <- lapply(package_name, function(.x) {
cli::cli_h3("Processing {.pkg {.x}}")
cli::cli_h2("Archiving {.pkg {.x}}")
if (!s3fs::s3_dir_exists(sprintf("%s/Archive/%s", remote_bin_dir, .x))) {
s3fs::s3_dir_create(sprintf("%s/Archive/%s", remote_bin_dir, .x))
}