test: use specific skip() function (#1149)

igraph · Jan 22, 2024 · a3d05cc · a3d05cc
2 parents 8e1f4d5 + 4367530
commit a3d05cc
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-graphNEL.R b/tests/testthat/test-graphNEL.R
@@ -1,5 +1,5 @@
 test_that("graphNEL conversion works", {
-  if (!requireNamespace("graph", quietly = TRUE)) skip("No graph package")
+  skip_if_not_installed("graph")
 
   suppressPackageStartupMessages(library(graph, warn.conflicts = FALSE))
 
@@ -29,7 +29,7 @@ test_that("graphNEL conversion works", {
 })
 
 test_that("graphNEL does not duplicate loop edges", {
-  if (!requireNamespace("graph", quietly = TRUE)) skip("No graph package")
+  skip_if_not_installed("graph")
 
   mat <- matrix(c(1, 0.5, 0.5, 0), nrow = 2)
   dimnames(mat) <- list(c("A", "B"), c("A", "B"))