Async.Start store

This commit is contained in:
Joseph Ferano 2022-06-07 21:42:24 +07:00
parent 3f5c9f9652
commit ba56e53fb0
2 changed files with 4 additions and 0 deletions

View File

@ -357,6 +357,9 @@ let handleStoreEvents _ (event : ComponentInteractionCreateEventArgs) =
builder.Content <- $"Incorrect Action identifier {id}"
do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
}
|> Async.AwaitTask
|> Async.Start
Task.CompletedTask
let sendBackalleyEmbed (ctx : IDiscordContext) =
async {

View File

@ -3,6 +3,7 @@
open Npgsql.FSharp
open DSharpPlus
open DSharpPlus.Entities
open Solnet.Programs
open dotenv.net
let prodEnv = DotEnv.Read(DotEnvOptions(envFilePaths = [ "./.prod.env" ]))