diff --git a/Bot/Whitelist.fs b/Bot/Whitelist.fs index d9d7a37..93c5127 100644 --- a/Bot/Whitelist.fs +++ b/Bot/Whitelist.fs @@ -60,26 +60,35 @@ let grantWhitelistRole isOg (ctx : IDiscordContext) = let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) = let ctx = DiscordEventContext event :> IDiscordContext - match event.Id with - | id when id.StartsWith("GimmeWhitelist") -> Store.buy "WHITELIST" None ctx - | id when id.StartsWith("Buy") -> - task { - let id = ctx.GetInteractionId() - let itemId = id.Split("-").[1] - let dispatch ctx = grantWhitelistRole (itemId = "WHITEOG") ctx - - do! Store.handleBuyItem dispatch ctx itemId - } :> Task - | id when id.StartsWith("CreateGuildInvite") -> InviteTracker.handleCreateInvite ctx - | id when id.StartsWith("ShowRecruited") -> InviteTracker.getInvitedUsersForId (ctx.GetDiscordMember()) ctx - | id when id.StartsWith("WalletStatus") -> InviteTracker.showWalletStatus ctx - | _ -> - task { - let builder = DiscordInteractionResponseBuilder() - builder.IsEphemeral <- true - builder.Content <- $"Incorrect Action identifier {ctx.GetInteractionId()}" - do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask - } + task { + let builder = DiscordInteractionResponseBuilder() + builder.IsEphemeral <- true + builder.Content <- $"🚀 __Mint Date:__ June 20th 6:30 UTC " + do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask + } : Task + +//let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) = +// let ctx = DiscordEventContext event :> IDiscordContext +// match event.Id with +// | id when id.StartsWith("GimmeWhitelist") -> Store.buy "WHITELIST" None ctx +// | id when id.StartsWith("Buy") -> +// task { +// let id = ctx.GetInteractionId() +// let itemId = id.Split("-").[1] +// let dispatch ctx = grantWhitelistRole (itemId = "WHITEOG") ctx +// +// do! Store.handleBuyItem dispatch ctx itemId +// } :> Task +// | id when id.StartsWith("CreateGuildInvite") -> InviteTracker.handleCreateInvite ctx +// | id when id.StartsWith("ShowRecruited") -> InviteTracker.getInvitedUsersForId (ctx.GetDiscordMember()) ctx +// | id when id.StartsWith("WalletStatus") -> InviteTracker.showWalletStatus ctx +// | _ -> +// task { +// let builder = DiscordInteractionResponseBuilder() +// builder.IsEphemeral <- true +// builder.Content <- $"Incorrect Action identifier {ctx.GetInteractionId()}" +// do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask +// } let setCurrentWhitelistStock amount (ctx : IDiscordContext) = task {