This commit is contained in:
Joseph Ferano 2022-05-29 16:55:32 +07:00
parent 517cf46b1a
commit 773f1c36c8

View File

@ -453,12 +453,11 @@ let handleMemberUpdated (client : DiscordClient) (event : GuildMemberUpdateEvent
let handleMessageCreated _ (event : MessageCreateEventArgs) =
task {
let bot = GuildEnvironment.botClientRecruit.Value
printfn $"What channel is it? {event.Channel.Id} - {GuildEnvironment.channelSubmitWallet} ||| Who done it? {event.Author.Id} - {bot.CurrentUser.Id}"
if event.Channel.Id = GuildEnvironment.channelSubmitWallet && event.Author.Id <> bot.CurrentUser.Id then
do! Async.Sleep 100
printfn "Going to delete"
try
do! event.Message.DeleteAsync()
printfn "Able to?"
with ex -> printfn $"HERE? {ex.Message}"
} :> Task
let handleGuildMemberAdded _ (eventArgs : GuildMemberAddEventArgs) =