From 695540d3a01591ab435d0a5b194139988bb0d13d Mon Sep 17 00:00:00 2001
From: simonpcouch <simonpatrickcouch@gmail.com>
Date: Tue, 11 Jun 2024 21:13:58 -0500
Subject: [PATCH] correct length >1 conditional

---
 R/collect_parameters.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/collect_parameters.R b/R/collect_parameters.R
index efd2b3d1..d9e4fd58 100644
--- a/R/collect_parameters.R
+++ b/R/collect_parameters.R
@@ -156,7 +156,7 @@ collect_params <- function(cols_map, model_metrics, candidates, workflows, blend
 }
 
 check_for_candidates <- function(model_metrics, candidates) {
-  if ((!inherits(candidates, "character")) | 
+  if ((!inherits(candidates, "character")) || 
       (!candidates %in% names(model_metrics))) {
     cli_abort(
       "The `candidates` argument to `collect_parameters()` must be the name