Return early if package is not loaded

Avoids problems if package is not installed
r-lib · Oct 22, 2019 · afcf95e · afcf95e
1 parent 5ea544c
commit afcf95e
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/R/rlang.R b/R/rlang.R
@@ -10,6 +10,14 @@ downstream_deps <- list(
 )
 
 check_downstream_dep <- function(dep, pkg) {
+  if (!isNamespaceLoaded(pkg)) {
+    setHook(
+      packageEvent(pkg, "onLoad"),
+      function(...) check_downstream_dep(dep, pkg)
+    )
+    return()
+  }
+
   min <- dep[["min"]]
   from <- dep[["from"]]
   stopifnot(