testthat fix