From c895acc6196ab1bb87ceb9546c70072eb14f5814 Mon Sep 17 00:00:00 2001
From: "Gergely Daroczi (@daroczig)" <daroczig@rapporter.net>
Date: Fri, 22 Oct 2021 22:26:45 +0200
Subject: [PATCH] check if multiple packages fail with parallel install

---
 inst/examples/install2.r | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/inst/examples/install2.r b/inst/examples/install2.r
index cf28ef8..db6b6dd 100755
--- a/inst/examples/install2.r
+++ b/inst/examples/install2.r
@@ -79,7 +79,8 @@ install_packages2 <- function(pkgs, ..., error = FALSE, skipinstalled = FALSE) {
             catch <-
                 grepl("download of package .* failed", e$message) ||
                 grepl("(dependenc|package).*(is|are) not available", e$message) ||
-                grepl("installation of package.*had non-zero exit status", e$message)
+                grepl("installation of package.*had non-zero exit status", e$message) ||
+                grepl("installation of one or more packages failed", e$message)
             if (catch) {
                 e <<- e
             }