diff --git a/R/utils.R b/R/utils.R index 3fdf162..6028683 100644 --- a/R/utils.R +++ b/R/utils.R @@ -243,7 +243,7 @@ TokenBucket <- setRefClass( addTokens = function() { current_time <- as.numeric(Sys.time()) elapsed_time <- current_time - last_update - if (elapsed_time >= 1) { + if (elapsed_time >= intervall) { tokens <<- capacity last_update <<- current_time }