(v1.7.0) unit tests

inst/tinytest/test-zzz.R

@@ -102,7 +102,7 @@ for (i in seq_len(length(import_functions))) {
   fn <- names(import_functions)[i]
   pkg <- unname(import_functions[i])
   # function should exist in foreign pkg namespace
-  if (pkg %in% rownames(installed.packages())) {
+  if (AMR:::pkg_is_available(pkg, also_load = FALSE)) {
     tst <- !is.null(AMR:::import_fn(name = fn, pkg = pkg, error_on_fail = FALSE))
     expect_true(tst,
                 info = ifelse(tst,