pass force down to store_build_metadata
This commit is contained in:
parent
2384b77d10
commit
ded2dd5a8b
1 changed files with 2 additions and 2 deletions
|
|
@ -88,14 +88,14 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
|
||||||
tryCatch(
|
tryCatch(
|
||||||
{
|
{
|
||||||
p()
|
p()
|
||||||
store_build_metadata(x, y, platform, FALSE)
|
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)
|
||||||
},
|
},
|
||||||
error = function(e) {
|
error = function(e) {
|
||||||
message(sprintf("Error in processing package %s with tag %s: %s", x, y, e))
|
message(sprintf("Error in processing package %s with tag %s: %s", x, y, e))
|
||||||
local_clone_dir_single <- sprintf("%s/%s_%s", local_clone_dir, x, y)
|
local_clone_dir_single <- sprintf("%s/%s_%s", local_clone_dir, x, y)
|
||||||
unlink(local_clone_dir_single, force = TRUE, recursive = TRUE)
|
unlink(local_clone_dir_single, force = TRUE, recursive = TRUE)
|
||||||
store_build_metadata(x, y, platform, TRUE)
|
store_build_metadata(x, y, platform, error_occurred = TRUE, force = force)
|
||||||
}
|
}
|
||||||
)
|
)
|
||||||
}, package_name, tag, future.seed = TRUE)
|
}, package_name, tag, future.seed = TRUE)
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue