Backward compatibility: Call ClusterRegistry(action = "stop") for now…

…, if nothing is specified [#719]
futureverse · May 29, 2024 · d4b460d · d4b460d
1 parent 9cc64fa
commit d4b460d
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: future
-Version: 1.33.2-9002
+Version: 1.33.2-9003
 Title: Unified Parallel and Distributed Processing in R for Everyone
 Imports:
     digest,

diff --git a/R/zzz.plan.R b/R/zzz.plan.R
@@ -186,6 +186,9 @@ plan <- local({
       } else {
         stop(FutureError(sprintf("Unknown type of 'cleanup' attribute on current future strategy: %s", sQuote(paste(class(cleanup), collapse = ", ")))))
       }
+    } else {
+      ## Backward compatibility for future (<= 1.33.2)
+      ClusterRegistry(action = "stop")
     }
   }