future.callr assumes FutureInterruptError() has a default 'message'; fix until future.callr doesn't make this assumption

Author: HenrikBengtsson

DESCRIPTION

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

R/protected_api-FutureCondition-class.R

@@ -445,8 +445,8 @@ FutureLaunchError <- function(..., future = NULL) {
 
 #' @rdname FutureCondition
 #' @export
-FutureInterruptError <- function(..., when = Sys.time(), future = NULL) {
-  cond <- FutureError(..., when = when, future = future)
+FutureInterruptError <- function(message = "A future was interrupted", when = Sys.time(), future = NULL) {
+  cond <- FutureError(message = message, when = when, future = future)
   class <- c("FutureInterruptError", class(cond))
   class(cond) <- class[!duplicated(class, fromLast = TRUE)]
   cond