From 8b96211df0ea3ae119cee7db337bfebc47058847 Mon Sep 17 00:00:00 2001 From: pat-s Date: Sun, 3 Nov 2024 23:03:05 +0100 Subject: [PATCH] feat: allow subsetting to latest package tag --- R/build_binaries.R | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/R/build_binaries.R b/R/build_binaries.R index 07ad149..ee7696e 100644 --- a/R/build_binaries.R +++ b/R/build_binaries.R @@ -72,7 +72,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL, gert::git_config_global_set("advice.detachedHead", "false") - if (is.null(tag)) { + if (tag == "latest" || is.null(tag)) { gert::git_clone(sprintf("https://github.com/cran/%s", package_name), path = sprintf("%s/%s", tempdir(), "tmp1"), verbose = FALSE @@ -84,6 +84,10 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL, unlink(sprintf("%s/%s", tempdir(), "tmp1"), force = TRUE, recursive = TRUE) tag <- all_tags$name + # gert cannot sort by date (which is a problem for properly sorting tags like 1.0-10 and others) + if (tag == "latest") { + system("git tag --sort=-creatordate | head -1") + } package_name <- rep(package_name, length(tag)) }