fix crash-on-completion for progress #44

DistanceDevelopment · Jun 15, 2021 · fcf6121 · fcf6121
1 parent 69cc04c
commit fcf6121
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/R/bootdht.R b/R/bootdht.R
@@ -303,7 +303,6 @@ bootdht <- function(model,
              summary_fun=summary_fun, convert.units=convert.units,
              pb=list(increment=function(pb){invisible()}))
     }
-    pb$done(pb$pb)
     # post-process
     nbootfail <- sum(unlist(lapply(boot_ests, is.na)))
     boot_ests <- Filter(function(x) !is.na(x), boot_ests)