diff --git a/R/make_split_fun.R b/R/make_split_fun.R index aff197de1..acceb40e0 100644 --- a/R/make_split_fun.R +++ b/R/make_split_fun.R @@ -348,7 +348,7 @@ add_combo_facet <- function(name, label = name, levels, extra = list()) { subexpr <- expression(TRUE) datpart <- list(fulldf) } else { - subexpr <- .combine_value_exprs(ret$value[levels]) + subexpr <- .combine_value_exprs(ret$values[levels]) datpart <- list(do.call(rbind, ret$datasplit[levels])) }