test failures at `makeup_dat()` function

[pablotis]

Failing tests:

• makeup/tests/testthat/test-dates.R

  Line 7 in e4cde16

  expect_error(guess_date_fmt(sample, locale = "ru_XX"))

  • Returns a NULL because `lubridate::guess_formats() doesn't recognize "Abr 4", but it does with "Apr 4"

• makeup/tests/testthat/test-dates.R

  Line 8 in e4cde16

  expect_equivalent(guess_date_fmt(sample),"%B %dth %Y")

• makeup/tests/testthat/test-dates.R

  Line 14 in e4cde16

  expect_equivalent(guess_date_fmt(sample), "%b %d")

• makeup/tests/testthat/test-dates.R

  Line 15 in e4cde16

  expect_equivalent(guess_date_fmt(sample, locale = "es-CO"), "%b %d")

• makeup/tests/testthat/test-dates.R

  Line 18 in e4cde16

  # expect_equal(guess_date_locale("Ago 3"),"es-ES")

• makeup/tests/testthat/test-dates.R

  Line 65 in e4cde16

  expect_equal(makeup_dat(v, sample = "Janeiro 4"), "Março 04")

• makeup/tests/testthat/test-dates.R

  Line 73 in e4cde16

  # expect_equal(makeup_dat(v, sample = "Ene 3", locale = "es-CO"), "Mar 4")

• makeup/tests/testthat/test-dates.R

  Line 74 in e4cde16

  expect_equal(makeup_dat(v, sample = "Ene 3", locale = "es-CO"), "Mar 04")

• makeup/tests/testthat/test-dates.R

  Line 88 in e4cde16

  expect_equal(makeup_dat(v, locale = "de-DE", format = "%B %d %Y"), "März 04 2020")

• makeup/tests/testthat/test-dates.R

  Line 89 in e4cde16

  # expect_equal(makeup_dat(v, locale = "ru-RU", format = "%B %d %Y"), "марта 04 2020")