danger -> warning for debug mode

This commit is contained in:
Patrick Schratz 2024-07-26 11:34:01 +02:00
commit f42d470e34
Signed by: pat-s
GPG key ID: 3C6318841EF78925

View file

@ -49,8 +49,8 @@ add_to_package_index <- function(
pkgs_upload_remote <- sprintf("%sPACKAGES", remote_bin_dir)
if (debug) {
cli::cli_alert_danger("DEBUG: PACKAGES UPLOAD local dir: {pkgs_upload_local}")
cli::cli_alert_danger("DEBUG: PACKAGES UPLOAD remote dir: {pkgs_upload_remote}")
cli::cli_alert_warning("DEBUG: PACKAGES UPLOAD local dir: {pkgs_upload_local}")
cli::cli_alert_warning("DEBUG: PACKAGES UPLOAD remote dir: {pkgs_upload_remote}")
}
dummy <- s3fs::s3_file_upload(pkgs_upload_local, pkgs_upload_remote, overwrite = TRUE)