diff --git a/local/packages-to-build.R b/local/packages-to-build.R index 9d19b0b..4e6d754 100644 --- a/local/packages-to-build.R +++ b/local/packages-to-build.R @@ -48,11 +48,12 @@ archive_versions <- rbindlist( fill = TRUE ) -# Select the 9 most recent by mtime for each package +# Select the 4 most recent archive versions by mtime for each package +# Combined with the 1 release version = 5 versions per package archive_versions <- archive_versions[ order(Package, -as.numeric(mtime)) ][, - head(.SD, 9), + head(.SD, 4), by = Package ][, .(Package, Version) @@ -128,5 +129,8 @@ setkey(errored_pkgs, Package, Version) ### Final subsetting pkgs_no_error <- pkgs_to_build[!errored_pkgs] -# only return package names -pkgs <- unique(as.character(pkgs_no_error[!s3_dt, Package])) +# Return the full (Package, Version) pairs that need building +pkgs <- pkgs_no_error[!s3_dt] +# Deduplicate +pkgs <- unique(pkgs) +setorder(pkgs, Package, Version)