tryCatch approach with specific error handler

Author: MichaelChirico

tests/testthat/test-standalone-errors.R

@@ -134,7 +134,7 @@ test_that("chain_call", {
 })
 
 test_that("errors from subprocess", {
-  skip_if(!requireNamespace("callr", quietly = TRUE) || packageVersion("callr") != "3.7.0", "only with callr exactly 3.7.0")
+  skip_if_not(isTRUE(tryCatch(packageVersion("callr") == "3.7.0", packageNotFoundError = function(c) FALSE)), "only with callr exactly 3.7.0")
   err <- tryCatch(
     callr::r(function() 1 + "a"),
     error = function(e) e