FIX: The 'progress' handler would not redraw itself when there had been zero progress

HenrikBengtsson · HenrikBengtsson · commit 2099cb0c38d6 · 2020-05-11T15:20:38.000-07:00
diff --git a/R/handler_progress.R b/R/handler_progress.R
@@ -54,6 +54,7 @@ handler_progress <- function(format = "[:bar] :percent :message", show_after = 0
     redraw_progress_bar <- function(pb) {
       if (pb$finished) return()
       private <- pb$.__enclos_env__$private
+      private$last_draw <- ""
       private$render(list())
     }
   } else {

Original file line number	Diff line number	Diff line change
`@@ -54,6 +54,7 @@ handler_progress <- function(format = "[:bar] :percent :message", show_after = 0`
`54`	`54`	`redraw_progress_bar <- function(pb) {`
`55`	`55`	`if (pb$finished) return()`
`56`	`56`	`private <- pb$.__enclos_env__$private`
	`57`	`+ private$last_draw <- ""`
`57`	`58`	`private$render(list())`
`58`	`59`	`}`
`59`	`60`	`} else {`