pass debug to build_single_tag()

This commit is contained in:
Patrick Schratz 2024-07-24 19:57:40 +02:00
commit 71d395e6fc
Signed by: pat-s
GPG key ID: 3C6318841EF78925

View file

@ -89,7 +89,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
{
p()
store_build_metadata(x, y, platform, error_occurred = FALSE, force = force)
dump <- build_single_tag(x, y, dir_out_bin, local_clone_dir, platform = platform)
dump <- build_single_tag(x, y, dir_out_bin, local_clone_dir, platform = platform, debug = debug)
},
error = function(e) {
message(sprintf("Error in processing package %s with tag %s: %s", x, y, e))
@ -130,7 +130,8 @@ build_single_tag <- function(
package_name, tag = NULL,
platform,
dir_out_bin,
local_clone_dir) {
local_clone_dir,
debug = FALSE) {
cli::cli_alert("{.fun build_single_tag}: (1/3) Cloning package {.pkg {package_name}} with tag {.field {tag}}.")
local_clone_dir_single <- sprintf("%s/%s_%s", local_clone_dir, package_name, tag)