Remove invited user when they leave the server

This commit is contained in:
Joseph Ferano 2022-03-04 20:37:15 +07:00
parent 3e7cb47438
commit 3775ff5a44

View File

@ -182,12 +182,7 @@ let handleGuildMemberAdded _ (eventArgs : GuildMemberAddEventArgs) =
let handleGuildMemberRemoved _ (eventArgs : GuildMemberRemoveEventArgs) = let handleGuildMemberRemoved _ (eventArgs : GuildMemberRemoveEventArgs) =
task { task {
// let! guildInvites = eventArgs.Guild.GetInvitesAsync() do! removeInvitedUser eventArgs.Member.Id
// let! cachedInvites = getInvites()
// for invite in guildInvites do
// if invite.Uses < (snd cachedInvites.[invite.Code]) then
// do! addInvitedUser eventArgs.Member.Id invite.Code |> Async.Ignore
return ()
} :> Task } :> Task
type Inviter() = type Inviter() =