refactor: remove redundant isTRUE

m-muecke · Jul 19, 2024 · 89548a7 · 89548a7
1 parent 074ce87
commit 89548a7
Showing 1 changed file with 2 additions and 5 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -1,9 +1,6 @@
-is_installed <- function(pkg) {
-  isTRUE(requireNamespace(pkg, quietly = TRUE))
-}
-
 as_tibble <- function(x) {
-  if (getOption("gleif.use_tibble", TRUE) && is_installed("tibble")) {
+  if (getOption("gleif.use_tibble", TRUE) &&
+        requireNamespace("tibble", quietly = TRUE)) {
     tibble::as_tibble(x)
   } else {
     x