:::start

tests/testthat/helper-functions.R

@@ -365,7 +365,7 @@ tests_exit <- function() {
 #' @param code R code to execute in a child session
 #' @return port number of the successful attempt
 run_servr <- function(directory, port) {
-  start_servr(directory, port, tmpPath = find_test_path())
+  animint2:::start_servr(directory, port, tmpPath = find_test_path())
 }
 
 # --------------------------