JosephFerano/discord-bot-game
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix analytics

Browse Source
This commit is contained in:
Joseph Ferano 2022-06-18 21:52:17 +07:00
parent 233691541c
commit a517956901
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Bot/InviteTracker.fs
View File

@ -291,7 +291,11 @@ let private processNewUser (eventArgs : GuildMemberAddEventArgs) =
do! updateInviteCount invite.Code invite.Uses do! updateInviteCount invite.Code invite.Uses
do! addInvitedUser eventArgs.Member.Id inviterId invite.Code |> Async.Ignore do! addInvitedUser eventArgs.Member.Id inviterId invite.Code |> Async.Ignore
with ex -> printfn $"Tried to add existing user {eventArgs.Member.Id}:{eventArgs.Member.Username} to invites: {ex.Message}" with ex -> printfn $"Tried to add existing user {eventArgs.Member.Id}:{eventArgs.Member.Username} to invites: {ex.Message}"
do! Analytics.invitedUserEntered invite.Code invite.Inviter.Id eventArgs.Member.Id invite.Inviter.Username eventArgs.Member.Username match! DbService.tryFindPlayer inviterId with
| Some inviter ->
do! Analytics.invitedUserEntered invite.Code inviter.DiscordId eventArgs.Member.Id inviter.Name eventArgs.Member.Username
| None ->
do! Analytics.invitedUserEntered invite.Code inviterId eventArgs.Member.Id "Unknown" eventArgs.Member.Username
| None -> () | None -> ()
} :> Task } :> Task