Bump update to every 5 minutes

This commit is contained in:
Joseph Ferano 2022-04-25 18:32:26 +07:00
parent a60660b7c2
commit 6c7a452e72

View File

@ -382,9 +382,9 @@ let sendEmbed (jackpotNumChannel : DiscordChannel) slotsChannel (message : Disco
embed.Title <- $"CURRENT JACKPOT: `{jackpot} 💰 $GBT`" embed.Title <- $"CURRENT JACKPOT: `{jackpot} 💰 $GBT`"
// Update Jackpot channel // Update Jackpot channel
try // try
do! jackpotNumChannel.ModifyAsync(fun channelEditModel -> channelEditModel.Name <- $"Jackpot: {jackpot} 💰 $GBT") |> Async.AwaitTask // do! jackpotNumChannel.ModifyAsync(fun channelEditModel -> channelEditModel.Name <- $"Jackpot: {jackpot} 💰 $GBT") |> Async.AwaitTask
with ex -> printfn $"Error changing name: {ex.Message}" // with ex -> printfn $"Error changing name: {ex.Message}"
builder.AddEmbed(embed) |> ignore builder.AddEmbed(embed) |> ignore
@ -412,7 +412,7 @@ let sendEmbedWithLoop (jackpotNumChannel : DiscordChannel) (slotsChannel : Disco
| [] -> sendEmbed jackpotNumChannel slotsChannel None | [] -> sendEmbed jackpotNumChannel slotsChannel None
| msg::_ -> async.Return (Some msg) | msg::_ -> async.Return (Some msg)
while true do while true do
do! Async.Sleep 10000 do! Async.Sleep 305000
do! sendEmbed jackpotNumChannel slotsChannel message |> Async.Ignore do! sendEmbed jackpotNumChannel slotsChannel message |> Async.Ignore
} |> Async.Start } |> Async.Start