Text in portuguese not passing tests for dates

[jpmarindiaz]

Issue with tolower() for months sysdata coming in portuguese character ç

expect_equal(makeup_dat(as.Date("2020-03-04"), sample = "Janeiro 4"), "Março 04")