Bump the loop

This commit is contained in:
Joseph Ferano 2022-05-06 15:55:17 +07:00
parent ff9854b88d
commit 9d42213ec6

View File

@ -395,7 +395,7 @@ let sendEmbedWithLoop (jackpotNumChannel : DiscordChannel) (slotsChannel : Disco
| [] -> sendEmbed jackpotNumChannel slotsChannel None
| msg::_ -> async.Return (Some msg)
while true do
do! Async.Sleep 5000
do! Async.Sleep 30000
do! sendEmbed jackpotNumChannel slotsChannel message |> Async.Ignore
} |> Async.Start