From 4c0949d3f66072c7d41ccc25e7f5f2388fcc09c4 Mon Sep 17 00:00:00 2001
From: Sebastian Carl <mrcaseb@gmail.com>
Date: Wed, 14 Feb 2024 11:50:29 +0100
Subject: [PATCH] read tag name to archive from env var

---
 dev/run_archive.R | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/dev/run_archive.R b/dev/run_archive.R
index ad64c9c..607b0d4 100644
--- a/dev/run_archive.R
+++ b/dev/run_archive.R
@@ -1,3 +1,13 @@
 pkgload::load_all()
-piggyback::pb_releases("nflverse/nflverse-data")$tag_name |>
-  lapply(nflversedata::nflverse_archive)
+
+tag <- Sys.getenv("NFLVERSE_ARCHIVE_TAG", unset = NA_character_)
+
+if (is.na(tag)){
+  cli::cli_abort("Can't find the release tag to archive!")
+} else {
+  nflversedata::nflverse_archive(release_name = tag)
+}
+
+# Create tag list for workflow file
+# all_tags <- piggyback::pb_releases("nflverse/nflverse-data")$tag_name
+# cli::cli_bullets(paste("-", sort(all_tags)))