Never seeing the first progress message from cli_progress_along()

[asadow]

cli_progress_along() seems to be skipping the first iteration, and after 2 seconds, the function outputs the message regarding the first iteration even though it is on the second?
 

library(cli)
lapply(cli_progress_along(1:2, 
                        format = "Downloading data file {cli::pb_current}"),
     function(i) {
Sys.sleep(2)
})
#> Downloading data file 1
#> [[1]]
#> NULL
#> 
#> [[2]]
#> NULL

^{Created on 2024-02-02 with reprex v2.0.2}

[gaborcsardi]

Seems indeed like a bug.