_

Bot/Admin.fs

@@ -18,7 +18,7 @@ type InitEmbeds =
     | JpegStore = 3
     | Armory = 4
 
-let handleGuildDownloadReady (_ : DiscordClient) (event : GuildDownloadCompletedEventArgs) =
+let handleGuildDownloadReady _ (event : GuildDownloadCompletedEventArgs) =
     task {
         let ( _ , guild ) = event.Guilds.TryGetValue(GuildEnvironment.guildId)
         let! commands = guild.GetApplicationCommandsAsync()

Bot/Bot.fs

@@ -79,7 +79,7 @@ slotsBot.add_ComponentInteractionCreated(AsyncEventHandler(SlotMachine.handleBut
 slotsBot.add_GuildDownloadCompleted(AsyncEventHandler(SlotMachine.handleGuildDownloadCompleted))
 slotsBot.add_MessageCreated(AsyncEventHandler(SlotMachine.handleMessageCreated))
 
-let asdf (_ : DiscordClient) (event : DSharpPlus.EventArgs.InteractionCreateEventArgs) =
+let asdf _ (event : DSharpPlus.EventArgs.InteractionCreateEventArgs) =
     async {
         printfn "%A" event.Interaction.Type
         match event.Interaction.Type with

Bot/Games/HackerBattle.fs

@@ -284,7 +284,7 @@ let arsenal (ctx : IDiscordContext) =
         do! Analytics.arsenalCommand (ctx.GetDiscordMember())
     })
 
-let handleButtonEvent (_ : DiscordClient) (event : ComponentInteractionCreateEventArgs) =
+let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) =
     let eventCtx = DiscordEventContext event :> IDiscordContext
     match event.Id with
     | id when id.StartsWith("Attack")  -> handleAttack eventCtx
@@ -300,7 +300,7 @@ let handleButtonEvent (_ : DiscordClient) (event : ComponentInteractionCreateEve
             do! eventCtx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
         }
 
-let handleMessageCreated (_ : DiscordClient) (event : MessageCreateEventArgs) =
+let handleMessageCreated _ (event : MessageCreateEventArgs) =
     task {
         if event.Channel.Id = GuildEnvironment.channelTraining && event.Author.Id <> GuildEnvironment.botIdHackerBattle then
             do! Async.Sleep 1000
@@ -320,7 +320,7 @@ let ShieldEvents () = [
       Type = Shielding (string ItemId.CYPHER) }
 ]
 
-let handleMemberUpdated (client : DiscordClient) (event : GuildMemberUpdateEventArgs) =
+let handleMemberUpdated _ (event : GuildMemberUpdateEventArgs) =
     let addedRole (rolesBefore : DiscordRole seq) (rolesAfter : DiscordRole seq) =
         rolesAfter |> Seq.filter ((fun role -> rolesBefore |> Seq.exists (fun r -> role.Id = r.Id)) >> not)
     task {

Bot/Games/SlotMachine.fs

@@ -319,7 +319,7 @@ let spin multiplier (ctx : IDiscordContext) =
             do! Messaging.sendFollowUpMessage ctx "You do not have sufficient funds to play"
     })
 
-let handleButton (_ : DiscordClient) (event : ComponentInteractionCreateEventArgs) =
+let handleButton _ (event : ComponentInteractionCreateEventArgs) =
     let ctx = DiscordEventContext event
     match event.Id with
     | "spin-1x" -> spin 1 ctx
@@ -333,7 +333,7 @@ let handleButton (_ : DiscordClient) (event : ComponentInteractionCreateEventArg
     |> Async.Start
     Task.CompletedTask
 
-let handleGuildDownloadCompleted (_ : DiscordClient) (event : GuildDownloadCompletedEventArgs) =
+let handleGuildDownloadCompleted _ (event : GuildDownloadCompletedEventArgs) =
     task {
         let ( _ , guild ) = event.Guilds.TryGetValue(GuildEnvironment.guildId)
         guildEmojis <-
@@ -348,7 +348,7 @@ let handleGuildDownloadCompleted (_ : DiscordClient) (event : GuildDownloadCompl
         return ()
     } :> Task
 
-let handleMessageCreated (_ : DiscordClient) (event : MessageCreateEventArgs) =
+let handleMessageCreated _ (event : MessageCreateEventArgs) =
     task {
         if event.Channel.Id = GuildEnvironment.channelSlots && event.Author.Id <> GuildEnvironment.botClientSlots.Value.CurrentUser.Id then
             do! Async.Sleep 1000

Bot/Games/Store.fs

@@ -280,7 +280,7 @@ let showStats (ctx : IDiscordContext) = PlayerInteractions.executePlayerAction c
     do! ctx.FollowUp builder |> Async.AwaitTask
 })
 
-let handleStoreEvents (_ : DiscordClient) (event : ComponentInteractionCreateEventArgs) =
+let handleStoreEvents _ (event : ComponentInteractionCreateEventArgs) =
     let ctx = DiscordEventContext event :> IDiscordContext
     let id = ctx.GetInteractionId()
     let itemId = id.Split("-").[1]

Bot/Games/Thief.fs

@@ -235,7 +235,7 @@ let handleSteal (ctx : IDiscordContext) =
             do! ctx.Respond(InteractionResponseType.UpdateMessage, builder) |> Async.AwaitTask
         } |> Async.StartAsTask :> Task
 
-let handleStealButton (_ : DiscordClient) (event : ComponentInteractionCreateEventArgs) =
+let handleStealButton _ (event : ComponentInteractionCreateEventArgs) =
     let eventCtx = DiscordEventContext event :> IDiscordContext
     match event.Id with
     | id when id.StartsWith("Steal")  -> handleSteal eventCtx

Bot/InviteTracker.fs

@@ -573,7 +573,7 @@ let handleMemberUpdated (client : DiscordClient) (event : GuildMemberUpdateEvent
         return ()
     } :> Task
     
-let handleButtonEvent (_ : DiscordClient) (event : ComponentInteractionCreateEventArgs) =
+let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) =
     let eventCtx = DiscordEventContext event :> IDiscordContext
     match event.Id with
     | id when id.StartsWith("GimmeWhitelist")  -> handleGimmeWhitelist eventCtx