Remove ineffective promise cache from as.promise.mirai_map (#641)

Author: shikokuchuo

NEWS.md

@@ -2,6 +2,7 @@
 
 #### Updates
 
+* Removes an ineffective promise cache from the `as.promise()` method for 'mirai_map' objects.
 * Fixes `mirai_map()` collection option `.flat` ignoring an 'errorValue' in the first element (#639).
 * Fixes `daemon()` returning exit code 1 (idletime) instead of 2 (walltime) when `walltime` elapses while idle (#637).
 * Fixes `race_mirai()` not waiting for resolution on compute profiles set with `url` and `dispatcher = FALSE` (#635).

R/promises.R

@@ -89,15 +89,7 @@ handle_fulfilled <- function(value, .visible) {
 #'
 #' @exportS3Method promises::as.promise
 #'
-as.promise.mirai_map <- function(x) {
-  promise <- attr(x, "promise")
-
-  if (is.null(promise)) {
-    attr(x, "promise") <- promises::promise_all(.list = x) -> promise
-  }
-
-  promise
-}
+as.promise.mirai_map <- function(x) promises::promise_all(.list = x)
 
 #' @exportS3Method promises::is.promising
 #'