Handle R 3.6

r-lib · Jul 15, 2024 · 117317c · 117317c
1 parent f471779
commit 117317c
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/parse_all.R b/R/parse_all.R
@@ -128,6 +128,8 @@ parse_all.character <- function(x, filename = NULL, allow_error = FALSE) {
   # Restore newlines stripped while converting to vector of lines
   if (length(res$src)) {
     res$src <- paste0(res$src, "\n")
+  } else {
+    res$src <- character()
   }
 
   res$expr <- lapply(res$expr, removeSource)