From a50688e0d0ec67b884a3134d93ce800e0ef5b9f4 Mon Sep 17 00:00:00 2001 From: hyginn Date: Tue, 13 Oct 2020 20:35:45 +1000 Subject: [PATCH] bugfix: jsonlite::fromJSON() chokes on a blank --- scripts/ABC-dbUtilities.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scripts/ABC-dbUtilities.R b/scripts/ABC-dbUtilities.R index c74c849..b7dcdc6 100644 --- a/scripts/ABC-dbUtilities.R +++ b/scripts/ABC-dbUtilities.R @@ -614,7 +614,7 @@ dbSeq2JSON <- function(s, nIndents = 4, width = 70) { ind <- paste0(rep(" ", nIndents), collapse = "") out <- character() - out <- c(out, sprintf("%s\"sequence\" : [", ind)) + out <- c(out, sprintf("%s\"sequence\": [", ind)) for (i in seq_along(s)) { l <- nchar(s[i])