Decrease to zero timeout for reading logged output

HenrikBengtsson · HenrikBengtsson · commit a8356d83c56f · 2025-07-20T00:14:42.000+02:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: future.batchtools
-Version: 0.12.2-9930
+Version: 0.12.2-9931
 Depends:
     R (>= 3.2.0),
     parallelly,
diff --git a/R/BatchtoolsFutureBackend-class.R b/R/BatchtoolsFutureBackend-class.R
@@ -797,7 +797,7 @@ await <- function(future, cleanup = TRUE, ...) {
         ## Since we're already collected the results, the log file
         ## should already exist, if it exists.  Because of this,
         ## only poll for the log file for a second before giving up.
-        result[["batchtools_log"]] <- batchtools_getLog(id = jobid, reg = reg, timeout = 1.0)
+        result[["batchtools_log"]] <- batchtools_getLog(id = jobid, reg = reg, timeout = 0.0)
         if (result_has_errors(result)) cleanup <- FALSE
       }
     } else if ("error" %in% stat) {

Original file line number	Diff line number	Diff line change
`@@ -797,7 +797,7 @@ await <- function(future, cleanup = TRUE, ...) {`
`797`	`797`	`## Since we're already collected the results, the log file`
`798`	`798`	`## should already exist, if it exists. Because of this,`
`799`	`799`	`## only poll for the log file for a second before giving up.`
`800`		`- result[["batchtools_log"]] <- batchtools_getLog(id = jobid, reg = reg, timeout = 1.0)`
	`800`	`+ result[["batchtools_log"]] <- batchtools_getLog(id = jobid, reg = reg, timeout = 0.0)`
`801`	`801`	`if (result_has_errors(result)) cleanup <- FALSE`
`802`	`802`	`}`
`803`	`803`	`} else if ("error" %in% stat) {`