order code and skip clone
This commit is contained in:
parent
6f1b8dfa8d
commit
f1683f5855
1 changed files with 8 additions and 5 deletions
|
|
@ -19,6 +19,8 @@ upload_single_binary_to_s3 <- function(
|
|||
local_bin_path <- set_bin_path(r_minor_version, build_for_minor, local_build_root = local_build_root, codename)
|
||||
remote_bin_path <- set_bin_path(r_minor_version, build_for_minor, local_build_root = bucket, codename)
|
||||
|
||||
tarball_name <- sprintf("%s_%s.tar.gz", package_name, tag)
|
||||
|
||||
if (!file.exists(sprintf("%s/%s", local_bin_path, tarball_name))) {
|
||||
cli::cli_alert("{.fun upload_single_binary_to_s3}: File {.pkg {package_name}} {.field {tag}} does not exist locally - skipping upload.")
|
||||
return(TRUE)
|
||||
|
|
@ -36,7 +38,6 @@ upload_single_binary_to_s3 <- function(
|
|||
region_name = region,
|
||||
)
|
||||
|
||||
tarball_name <- sprintf("%s_%s.tar.gz", package_name, tag)
|
||||
exists <- s3fs::s3_file_exists(sprintf("%s/%s", remote_bin_path, tarball_name))
|
||||
|
||||
if ((!exists && !force) || (!exists && force)) {
|
||||
|
|
|
|||
Loading…
Reference in a new issue