From 89548a7627dfd5428ad9cbbeaa65121fd6bc504e Mon Sep 17 00:00:00 2001
From: Maximilian Muecke <muecke.maximilian@gmail.com>
Date: Fri, 19 Jul 2024 13:48:02 +0200
Subject: [PATCH] refactor: remove redundant isTRUE

---
 R/utils.R | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/R/utils.R b/R/utils.R
index e5ec156..ab3371c 100644
--- 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