fix 'get_github_user' so it works on github runners with no user

ropensci-review-tools · Aug 27, 2024 · 80cea21 · 80cea21
1 parent 4fcd77c
commit 80cea21
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: roreviewapi
 Title: Plumber API to report package structure and function
-Version: 0.1.0.040
+Version: 0.1.0.041
 Authors@R: 
     person("Mark", "Padgham", , "[email protected]", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0003-2172-5265"))

diff --git a/R/utils.R b/R/utils.R
@@ -30,7 +30,9 @@ get_github_user <- function () {
     # Then extract user:
     x <- strsplit (x, "\\n") [[1]]
     login <- grep ("\\\"login\\\"\\:", x, value = TRUE)
-    login <- gsub ("\\\"|,$", "", strsplit (login, "\\:\\s+") [[1]] [2])
+    if (length (login) > 0L) {
+        login <- gsub ("\\\"|,$", "", strsplit (login, "\\:\\s+") [[1]] [2])
+    }
 
     return (login)
 }

diff --git a/codemeta.json b/codemeta.json
@@ -8,7 +8,7 @@
   "codeRepository": "https://github.com/ropensci-review-tools/roreviewapi",
   "issueTracker": "https://github.com/ropensci-review-tools/roreviewapi/issues",
   "license": "https://spdx.org/licenses/GPL-3.0",
-  "version": "0.1.0.040",
+  "version": "0.1.0.041",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",