tests/testthat/test_packages/custom_translation/R/custom1.R

In MichaelChirico/potools: Tools for Internationalization and Portability in R Packages

foo = function(x) {
  stop("A default message")
}

bar = function(x) {
  MyTranslator("you found me!")
  MyDotsTranslator(excluded = "untranslated argument", "a translated", "argument")
}