cancel(): Error message on non-supported backends trunkated the error message [ci skip]

HenrikBengtsson · HenrikBengtsson · commit b2d4444e96f8 · 2025-07-08T13:03:39.000+02:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: future
-Version: 1.58.0-9014
+Version: 1.58.0-9015
 Title: Unified Parallel and Distributed Processing in R for Everyone
 Depends:
     R (>= 3.2.0)
diff --git a/R/core_api-cancel.R b/R/core_api-cancel.R
@@ -94,7 +94,7 @@ cancel.Future <- function(x, interrupt = TRUE, ...) {
   if (interrupt) {
     backend <- future[["backend"]]
     if (is.null(backend)) {
-      stop(FutureError("Interruption of futures require a backend implementing the FutureBackend API: ", sQuote(class(future)[1])))
+      stop(FutureError(sprintf("Interruption of futures require a backend implementing the FutureBackend API: %s", sQuote(class(future)[1]))))
     }
     local({
       if (debug) {

Original file line number	Diff line number	Diff line change
`@@ -94,7 +94,7 @@ cancel.Future <- function(x, interrupt = TRUE, ...) {`
`94`	`94`	`if (interrupt) {`
`95`	`95`	`backend <- future[["backend"]]`
`96`	`96`	`if (is.null(backend)) {`
`97`		`- stop(FutureError("Interruption of futures require a backend implementing the FutureBackend API: ", sQuote(class(future)[1])))`
	`97`	`+ stop(FutureError(sprintf("Interruption of futures require a backend implementing the FutureBackend API: %s", sQuote(class(future)[1]))))`
`98`	`98`	`}`
`99`	`99`	`local({`
`100`	`100`	`if (debug) {`