another 🐛 fix to coverage metric #130

Author: mpadge

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: repometrics
 Title: Metrics for Your Code Repository
-Version: 0.2.0.002
+Version: 0.2.0.003
 Authors@R: 
     person("Mark", "Padgham", , "mark.padgham@email.com", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0003-2172-5265"))

R/cm-metric-test-coverage.R

@@ -11,6 +11,9 @@ cm_data_test_coverage <- function (path, end_date = NULL) {
 
     readme <- readr::read_lines (readme, progress = FALSE)
     codecov <- grep ("codecov\\.io.*\\.svg", readme, value = TRUE)
+    if (length (codecov) == 0L) {
+        return (NA_real_)
+    }
     # That may not be separated by a linebreak, so:
     codecov <- strsplit (codecov, "\\[\\!\\[|\\s") [[1]]
     codecov <- grep ("codecov\\.io.*\\.svg", codecov, value = TRUE)

codemeta.json

@@ -8,7 +8,7 @@
   "codeRepository": "https://github.com/ropensci-review-tools/repometrics",
   "issueTracker": "https://github.com/ropensci-review-tools/repometrics/issues",
   "license": "https://spdx.org/licenses/GPL-3.0",
-  "version": "0.2.0.002",
+  "version": "0.2.0.003",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",