refactor: replace lapply with for loop in get_libraries.

- Replace lapply with a for loop to load packages individually while suppressing startup messages.

Author: lolow

R/get_libraries.R

@@ -18,12 +18,13 @@ require_package <- function(pkgs, loading = TRUE) {
   }
   rlang::check_installed(pkgs)
   if (loading) {
-    suppressPackageStartupMessages(lapply(pkgs,
-                                          library,
-                                          character.only = TRUE,
-                                          quietly = TRUE
-                                          )
-                                   )
+    for (pkg in pkgs) {
+      suppressPackageStartupMessages(library(pkg,
+                                            character.only = TRUE,
+                                            quietly = TRUE
+                                            )
+                                     )
+    }
   }
 }