Futures now muffle any packageStartupMessage conditions produced when pre-loading and pre-attaching packages [#803]

Author: HenrikBengtsson

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: future
-Version: 1.58.0-9025
+Version: 1.58.0-9026
 Title: Unified Parallel and Distributed Processing in R for Everyone
 Depends:
     R (>= 3.2.0)

NEWS.md

@@ -7,6 +7,10 @@
    the default for `plan(multisession)` work also on computers with a
    large number of CPU cores (e.g. 192 and 256 cores) while leaving 16
    connection slots available for other needs.
+   
+ * Futures now muffle any `packageStartupMessage` conditions produced
+   when pre-loading and pre-attaching packages, e.g. as specified by
+   the `packages` argument or those needed by global objects.
 
 ## Performance
 

R/backend_api-evalFuture.R

@@ -29,11 +29,15 @@ attachPackages <- function(packages) {
   ## call library(), which attaches the package. /HB 2016-06-16
   lib.loc <- .libPaths()
   tryCatch({
-    for (pkg in packages) {
-      loadNamespace(pkg)
-      library(pkg, character.only = TRUE, lib.loc = lib.loc, warn.conflicts = FALSE, quietly = FALSE, mask.ok = character(0L), exclude = character(0L), attach.required = TRUE)
-    }
-    NULL
+    withCallingHandlers({
+      for (pkg in packages) {
+        loadNamespace(pkg)
+        library(pkg, character.only = TRUE, lib.loc = lib.loc, warn.conflicts = FALSE, quietly = FALSE, mask.ok = character(0L), exclude = character(0L), attach.required = TRUE)
+      }
+      NULL
+    }, packageStartupMessage = function(m) {
+      invokeRestart("muffleMessage")
+    })
   }, error = identity)
 } ## attachPackages()