improve explicit srr_counts reporting of errors for ropensci-reivew-t…

…ools/srr#41

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: roreviewapi
 Title: Plumber API to report package structure and function
-Version: 0.1.0.024
+Version: 0.1.0.025
 Authors@R: 
     person("Mark", "Padgham", , "[email protected]", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0003-2172-5265"))

R/srr.R

@@ -48,6 +48,12 @@ srr_counts <- function (repourl, repo, issue_id, post_to_issue = TRUE) {
         return (out)
     }
 
+    index <- grep ("heavy_multiplication_x\\:\\s+Error\\:", srr_rep)
+    errors <- NULL
+    if (length (index) > 0L) {
+        errors <- c (srr_rep [index], "")
+    }
+
     index <- grep ("^\\#\\#\\sMissing Standards", srr_rep)
 
     if (length (index) > 0L) {
@@ -94,7 +100,7 @@ srr_counts <- function (repourl, repo, issue_id, post_to_issue = TRUE) {
         out <- roreviewapi::srr_counts_summary (srr_rep)
     }
 
-    out <- paste0 (out, collapse = "\n")
+    out <- paste0 (c (errors, out), collapse = "\n")
 
     if (post_to_issue) {
 

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.024",
+  "version": "0.1.0.025",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",