diff --git a/scripts/test_qc_pkg.R b/scripts/test_qc_pkg.R index cd50c1e..774e426 100644 --- a/scripts/test_qc_pkg.R +++ b/scripts/test_qc_pkg.R @@ -44,7 +44,7 @@ test_results <- tibble::as_tibble( ) ) -success[["test"]] <- sum(test_results[["failed"]]) == 0 +success[["test"]] <- (sum(test_results[["failed"]]) == 0) && !(any(test_results[["error"]])) # Copy _snaps folder so it can be archived later for test debugging # Empty if no errors are found