devxy/build-cran-binaries
Watch
1
0
Fork
You've already forked build-cran-binaries
 0
Code Issues 11 Pull requests 1 Releases Activity

be more precise with upload success message

Browse source
This commit is contained in:
Patrick Schratz 2024-07-29 16:31:51 +02:00
commit 32719ff957
Signed by: pat-s
GPG key ID: 3C6318841EF78925
3 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
.woodpecker/build.yaml
View file

@ -6,7 +6,7 @@ skip_clone: true
matrix: matrix:
include: include:
- PLATFORM: rhel-9 - PLATFORM: rhel-9
BLOCK: 903:1450 BLOCK: 920:1450
# - PLATFORM: rhel-9 # - PLATFORM: rhel-9
# BLOCK: 1051:1450 # BLOCK: 1051:1450
# - PLATFORM: rhel-9 # - PLATFORM: rhel-9

1
R/build_binaries.R
View file

@ -123,7 +123,6 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
{ {
p() p()
dump <- upload_single_binary_to_s3(package_name = x, tag = y, force = force, build_for_minor = build_for_minor, debug = debug) dump <- upload_single_binary_to_s3(package_name = x, tag = y, force = force, build_for_minor = build_for_minor, debug = debug)
cli::cli_alert_success("Successfully uploaded package {.pkg {x}} with tag {.field {y}}.")
}, },
error = function(e) { error = function(e) {
message(sprintf("Error in uploading package %s with tag %s: %s", x, y, e)) message(sprintf("Error in uploading package %s with tag %s: %s", x, y, e))

2
R/upload.R
View file

@ -46,6 +46,7 @@ upload_single_binary_to_s3 <- function(
sprintf("%s/%s", local_bin_path, tarball_name), sprintf("%s/%s", local_bin_path, tarball_name),
sprintf("%s/%s", remote_bin_path, tarball_name) sprintf("%s/%s", remote_bin_path, tarball_name)
) )
cli::cli_alert_success("Successfully uploaded package {.pkg {x}} with tag {.field {y}}.")
cli::cli_alert("{.fun upload_single_binary_to_s3}: Deleting binary for {.pkg {package_name}} {.field {tag}} at path {.path {sprintf('%s/%s', local_bin_path, tarball_name)}}.") cli::cli_alert("{.fun upload_single_binary_to_s3}: Deleting binary for {.pkg {package_name}} {.field {tag}} at path {.path {sprintf('%s/%s', local_bin_path, tarball_name)}}.")
file.remove(sprintf("%s/%s", local_bin_path, tarball_name)) file.remove(sprintf("%s/%s", local_bin_path, tarball_name))
} else if (exists && force) { } else if (exists && force) {
@ -55,6 +56,7 @@ upload_single_binary_to_s3 <- function(
sprintf("%s/%s", remote_bin_path, tarball_name), sprintf("%s/%s", remote_bin_path, tarball_name),
overwrite = TRUE overwrite = TRUE
) )
cli::cli_alert_success("Successfully uploaded package {.pkg {x}} with tag {.field {y}}.")
cli::cli_alert("{.fun upload_single_binary_to_s3}: Deleting binary for {.pkg {package_name}} {.field {tag}} at path {.path {sprintf('%s/%s', local_bin_path, tarball_name)}}.") cli::cli_alert("{.fun upload_single_binary_to_s3}: Deleting binary for {.pkg {package_name}} {.field {tag}} at path {.path {sprintf('%s/%s', local_bin_path, tarball_name)}}.")
file.remove(sprintf("%s/%s", local_bin_path, tarball_name)) file.remove(sprintf("%s/%s", local_bin_path, tarball_name))
} else if (exists && !force) { } else if (exists && !force) {