Merge pull request #347 from pharmaR/ni-341-pkg_ref_bug

Fixes bug for list inputs to pkg_ref()
pharmaR · Sep 17, 2024 · 45963e1 · 45963e1
2 parents 40365ce + abce274
commit 45963e1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/pkg_ref_class.R b/R/pkg_ref_class.R
@@ -239,7 +239,7 @@ as_pkg_ref <- function(x, ...) {
         source <- ifelse(length(dots$source) > 1, dots$source[i], dots$source)
       else source <- NULL
 
-      pkg_ref_list[[i]] <- as_pkg_ref(x[i], source=source)
+      pkg_ref_list[[i]] <- as_pkg_ref(x[[i]], source=source)
     }
 
     return(vctrs::new_list_of(pkg_ref_list, ptype = pkg_ref(), class = "list_of_pkg_ref"))