Accounting for GitHub Actions GITHUB_PAT system variable of ***

dfe-analytical-services · Nov 12, 2024 · 1853b75 · 1853b75
1 parent 0d1e2f2
commit 1853b75
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/diagnostic_test.R b/R/diagnostic_test.R
@@ -94,7 +94,8 @@ check_proxy_settings <- function(
 #' check_github_pat()
 check_github_pat <- function(clean = FALSE,
                              verbose = FALSE) {
-  github_pat <- Sys.getenv("GITHUB_PAT")
+  github_pat <- Sys.getenv("GITHUB_PAT") |>
+    stringr::str_replace_all("\\*", "") # Accounting for GitHub Actions "***"
   if (github_pat != "") {
     message(
       "FAIL: GITHUB_PAT is set to ",