outcome specification inconsistent between step_woe and other embed::step_* about embed HOT 2 CLOSED

library(recipes)
#> Loading required package: dplyr
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union
#> 
#> Attaching package: 'recipes'
#> The following object is masked from 'package:stats':
#> 
#>     step
library(embed)

data(PimaIndiansDiabetes, package = "mlbench")

d <- PimaIndiansDiabetes
d <- d %>%
  as_tibble() %>%
  select(diabetes, everything())

# make factor variables
d <- d %>%
  mutate(mass_fct = factor(ifelse(mass > 30, "large", "small"))) %>%
  mutate(pregnant_fct = as.factor(pregnant)) %>%
  mutate(pressure_fct = factor(case_when(
    pressure < 30 ~ "low",
    between(pressure, 30, 50) ~ "medium",
    pressure > 50 ~ "high"
  ))) %>%
  mutate(triceps_fct = factor(ifelse(triceps > 0, "has", "none"))) %>%
  mutate(insulin_fct = factor(insulin)) %>%
  mutate(age_fct = factor(age))

embed_rec <- recipe(diabetes ~ ., d) %>%
  step_woe(mass_fct, outcome = vars(diabetes)) %>%
  step_lencode_glm(pressure_fct, outcome = vars(diabetes))

prep(embed_rec, d)
#> Recipe
#> 
#> Inputs:
#> 
#>       role #variables
#>    outcome          1
#>  predictor         14
#> 
#> Training data contained 768 data points and no missing data.
#> 
#> Operations:
#> 
#> WoE version against outcome structure(list(~diabetes), .Names = "", class = c("quosures", 
#> "list")) for mass_fct [trained]
#> Linear embedding for factors via GLM for pressure_fct [trained]