From 810690b237543e1d9b4013a3446863c0602e5485 Mon Sep 17 00:00:00 2001 From: Anna Krystalli Date: Fri, 15 Nov 2024 10:59:01 +0200 Subject: [PATCH] remove isTRUE --- R/expand_model_out_grid.R | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/R/expand_model_out_grid.R b/R/expand_model_out_grid.R index fc029457..03ef5c6f 100644 --- a/R/expand_model_out_grid.R +++ b/R/expand_model_out_grid.R @@ -618,11 +618,9 @@ extract_mt_output_type_ids <- function(x, config_tid, force_output_types = FALSE } pre_v4_std <- function(output_type_ids) { - isTRUE( - setequal( - names(output_type_ids), - c("required", "optional") - ) + setequal( + names(output_type_ids), + c("required", "optional") ) }