fix erro for passing NULL to if condition

Yunuuuu · Jan 7, 2025 · d78a441 · d78a441
1 parent c1abbe3
commit d78a441
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/align-hclust.R b/R/align-hclust.R
@@ -252,7 +252,7 @@ AlignHclust <- ggproto("AlignHclust", Align,
             # merge children tree ------------------------------
             if (nlevels(panel) == 1L) {
                 statistics <- .subset2(statistics, 1L)
-            } else if (self$merge_dendro) {
+            } else if (isTRUE(self$merge_dendro)) {
                 # we have a function named merge_dendrogram(), so we use
                 # `merge_dendro` as the argument name
                 # `merge_dendrogram` will follow the order of the parent