Remove invited user when they leave the server
This commit is contained in:
		
							parent
							
								
									3e7cb47438
								
							
						
					
					
						commit
						3775ff5a44
					
				@ -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() =
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user