Update to newer function

juliasilge · Jun 1, 2023 · cb434c8 · cb434c8
1 parent 12073e2
commit cb434c8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/unnest_tokens.R b/R/unnest_tokens.R
@@ -158,7 +158,7 @@ unnest_tokens <- function(tbl, output, input, token = "words",
 
   tbl_indices <- vec_rep_each(seq_len(nrow(tbl)), lengths(output_lst))
   ret <- vec_slice(tbl, tbl_indices)
-  ret[[output]] <- flatten_chr(output_lst)
+  ret[[output]] <- purrr::list_c(output_lst)
 
   if (to_lower) {
     ret[[output]] <- stringr::str_to_lower(ret[[output]])