if we cannot identify variables, populate variable column with term

fix #63
larmarange · Oct 21, 2020 · f0e10c0 · f0e10c0
1 parent 9ec11e3
commit f0e10c0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/tidy_identify_variables.R b/R/tidy_identify_variables.R
@@ -83,7 +83,7 @@ tidy_identify_variables <- function(x, model = tidy_get_model(x),
     if (strict) stop("Cannot identify variables. Quitting execution.", call. = FALSE)
     x %>%
       dplyr::mutate(
-        variable = NA_character_,
+        variable = .data$term,
         var_class = NA_integer_,
         var_type = "unknown",
         var_nlevels = NA_integer_