flatten warnings before printing

mschubert · Aug 21, 2024 · ffc1009 · ffc1009
1 parent ec84432
commit ffc1009
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/summarize_result.r b/R/summarize_result.r
@@ -13,7 +13,7 @@ summarize_result = function(result, n_errors, n_warnings,
     cond_msgs$errors = cond_msgs$errors[order(as.integer(names(cond_msgs$errors)))]
     cond_msgs$warnings = cond_msgs$warnings[order(as.integer(names(cond_msgs$warnings)))]
     cond_msgs = utils::head(c(cond_msgs$errors, cond_msgs$warnings), 50)
-    detail = paste(cond_msgs, collapse="\n")
+    detail = paste(unlist(cond_msgs), collapse="\n")
 
     if (n_errors > 0) {
         msg = sprintf("%i/%i jobs failed (%i warnings)", n_errors, at, n_warnings)