diff --git a/R/find_random.R b/R/find_random.R index 98b816358..62d1cba62 100644 --- a/R/find_random.R +++ b/R/find_random.R @@ -54,7 +54,6 @@ find_random.default <- function(x, split_nested = FALSE, flatten = FALSE) { l <- .find_random_effects(x, f, split_nested) } - if (is_empty_object(l)) { return(NULL) } @@ -76,7 +75,6 @@ find_random.afex_aov <- function(x, split_nested = FALSE, flatten = FALSE) { } - .find_random_effects <- function(x, f, split_nested) { if (!object_has_names(f, "random") && !object_has_names(f, "zero_inflated_random")) { return(NULL) @@ -100,7 +98,6 @@ find_random.afex_aov <- function(x, split_nested = FALSE, flatten = FALSE) { r1 <- NULL } - if (object_has_names(f, "zero_inflated_random")) { if (is.list(f$zero_inflated_random)) { r2 <- unique(unlist( @@ -114,6 +111,5 @@ find_random.afex_aov <- function(x, split_nested = FALSE, flatten = FALSE) { r2 <- NULL } - compact_list(list(random = r1, zero_inflated_random = r2)) }