run() called twice did not produce a FutureError, just an regular error [ci skip]

Author: HenrikBengtsson

NEWS

@@ -1,13 +1,18 @@
 Package: future.batchtools
 ==========================
 
-Version: 0.9.0-9000 [2020-10-02]
+Version: 0.9.0-9000 [2020-10-13]
 
 DOCUMENTATION:
 
  * Document option 'future.delete' and clarify option 'future.cache.path'
    in help("future.batchtools.options").
- 
+
+BUG FIXES:
+
+ * If run() was called twice for a BatchtoolsFuture, it would not produce
+   a FutureError but only a regular non-classed error.
+
 
 Version: 0.9.0 [2020-04-14]
 

R/BatchtoolsFuture-class.R

@@ -367,7 +367,8 @@ run.BatchtoolsFuture <- function(future, ...) {
   if (future$state != "created") {
     label <- future$label
     if (is.null(label)) label <- "<none>"
-    stop(sprintf("A future ('%s') can only be launched once.", label))
+    msg <- sprintf("A future ('%s') can only be launched once.", label)
+    stop(FutureError(msg, future = future))
   }
 
   ## Assert that the process that created the future is