remove redundant slash

This commit is contained in:
Patrick Schratz 2024-07-26 11:29:27 +02:00
commit 6c27c52f21
Signed by: pat-s
GPG key ID: 3C6318841EF78925

View file

@ -45,8 +45,8 @@ add_to_package_index <- function(
\(x, y) s3fs::s3_file_upload(x, y, overwrite = TRUE)
)
pkgs_upload_local <- sprintf("%s/PACKAGES", local_bin_dir)
pkgs_upload_remote <- sprintf("%s/PACKAGES", remote_bin_dir)
pkgs_upload_local <- sprintf("%sPACKAGES", local_bin_dir)
pkgs_upload_remote <- sprintf("%sPACKAGES", remote_bin_dir)
if (debug) {
cli::cli_alert_danger("DEBUG: PACKAGES UPLOAD local dir: {pkgs_upload_local}")