(v1.6.0.9041) filter_ab_class() fix

tests/tinytest.R

@@ -27,8 +27,18 @@
 if (identical(Sys.getenv("R_RUN_TINYTEST"), "true")) {
   # env var 'R_LIBS_USER' got overwritten during 'R CMD check' in GitHub Actions, so:
   .libPaths(c(Sys.getenv("R_LIBS_USER_GH_ACTIONS"), .libPaths()))
-  print(.libPaths())
-  library(tinytest)
-  library(AMR)
-  test_package("AMR")
+  # helper function
+  pkg_is_available <- function(pkg, also_load = TRUE) {
+    if (also_load == TRUE) {
+      out <- suppressWarnings(require(pkg, character.only = TRUE, warn.conflicts = FALSE, quietly = TRUE))
+    } else {
+      out <- requireNamespace(pkg, quietly = TRUE)
+    }
+    isTRUE(out)
+  }
+  
+  if (pkg_is_available("tinytest")) {
+    library(AMR)
+    out <- test_package("AMR")
+  }
 }