diff --git a/R/axecute.R b/R/axecute.R index 9467da0..0b2091a 100644 --- a/R/axecute.R +++ b/R/axecute.R @@ -42,7 +42,7 @@ axecute <- function(file, log_name = NA, show_repo_url = FALSE, ...){ # deprecations - if (!hasArg(remove_log_object)) { + if (hasArg(remove_log_object)) { lifecycle::deprecate_stop("0.3.0", "axecute(remove_log_object = )", "axecute(include_rds = )") } diff --git a/tests/testthat/test-axecute.R b/tests/testthat/test-axecute.R index 32684b2..782de7d 100644 --- a/tests/testthat/test-axecute.R +++ b/tests/testthat/test-axecute.R @@ -81,7 +81,6 @@ test_that("show_repo_url works to show repo url elements", { axecute(scriptPath, log_name = "log_out_repo_url", log_path = logDir, - remove_log_object = FALSE, show_repo_url = TRUE ) con <- file(file.path(logDir, "log_out_repo_url"), "r") @@ -95,7 +94,6 @@ test_that("show_repo_url works to show repo url elements", { axecute(scriptPath, log_name = "log_out_repo_url2", log_path = logDir, - remove_log_object = FALSE, show_repo_url = FALSE ) con <- file(file.path(logDir, "log_out_repo_url2"), "r")