From 098a610039d9357d0f6ff86399dc7c7ccbddad45 Mon Sep 17 00:00:00 2001 From: Dillon Hammill Date: Thu, 28 Sep 2023 16:41:58 +1000 Subject: [PATCH] Handle multiple alias in GatingSet check. --- R/preprocessing-method.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/preprocessing-method.R b/R/preprocessing-method.R index e5a72c9..eb9689e 100644 --- a/R/preprocessing-method.R +++ b/R/preprocessing-method.R @@ -53,7 +53,7 @@ update_list <- function (x, val) popId <- gtPop@id gs_nodes <- basename(gs_pop_get_children(y[[1]], parent)) - if (length(gs_nodes) == 0 || !popAlias %in% gs_nodes) { + if (length(gs_nodes) == 0 || !any(popAlias %in% gs_nodes)) { message("Preprocessing for '", popAlias, "'") parent_data <- gs_pop_get_data(y, parent)