Fixed custom sources table being nerfed by json encoding/decoding process

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: Rpacman
 Type: Package
 Title: Very simple package manager for R
-Version: 1.0.15
+Version: 1.0.16
 Date: 2025-01-30
 Authors@R: person("Craig", "Williams", email = "craig@avsdev.uk", role = c("aut", "cre"))
 URL: https://avsdev.uk/R/Rpacman

R/snapshot_create.R

@@ -17,7 +17,10 @@ snapshot_create <- function(installOpts = list(Ncpus = parallel::detectCores()))
   lastSnapshot <- snapshot_latest()
   customSources <- empty_sources()
   if (!is.null(lastSnapshot) && "custom" %in% names(lastSnapshot$packages)) {
-    customSources <- rbind(customSources, lastSnapshot$packages$custom)
+    customSources <- rbind(
+      customSources,
+      do.call(rbind, lapply(lastSnapshot$packages$custom, data.frame))
+    )
   }
   packages <- compile_imports(customSources, installOpts)
   names(packages) <- c("core", "direct", "indirect", "custom", "install_order")
@@ -40,4 +43,4 @@ snapshot_create <- function(installOpts = list(Ncpus = parallel::detectCores()))
     R_version = paste(R.version$major, R.version$minor, sep = "."),
     packages = packages
   ))
-}
+}