Different output in date/time formatters depending on input

[rich-iannone]

When using fmt_date() and associated functions, the output values are in some cases slightly different when specifying the styles as an index value or as the style name. The result is a sometimes accidental inclusion of a leading zeros in day values.

For example, the following produces an undesired leading zero:

dplyr::tibble(
  date = c("2015-01-01", "2015-02-15", "2015-03-25"),
) %>%
  gt() %>%
  fmt_date(
    columns = date,
    date_style = "day_m_year"
  )

whereas using the following does not:

dplyr::tibble(
  date = c("2015-01-01", "2015-02-15", "2015-03-25"),
) %>%
  gt() %>%
  fmt_date(
    columns = date,
    date_style = 7
  )