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

Remove admin requirement

Browse Source
This commit is contained in:
Joseph Ferano 2022-05-20 20:35:15 +07:00
parent 530b943790
commit b5f96ea7ff
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
Bot/Admin.fs
View File

@ -19,6 +19,10 @@ type InitEmbeds =
| Armory = 5 | Armory = 5
| Wallet = 6 | Wallet = 6
type EnableDisable =
| Enable = 0
| Disable = 1
let handleGuildDownloadReady _ (event : GuildDownloadCompletedEventArgs) = let handleGuildDownloadReady _ (event : GuildDownloadCompletedEventArgs) =
task { task {
let ( _ , guild ) = event.Guilds.TryGetValue(GuildEnvironment.guildId) let ( _ , guild ) = event.Guilds.TryGetValue(GuildEnvironment.guildId)
@ -215,6 +219,11 @@ let pickRaffleWinners (ctx : IDiscordContext) =
do! ctx.FollowUp builder do! ctx.FollowUp builder
} :> Task } :> Task
let toggleRaffleAvailability enable (ctx : IDiscordContext) =
task {
do! Messaging.defer ctx
} :> Task
let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) = let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) =
let eventCtx = DiscordEventContext event :> IDiscordContext let eventCtx = DiscordEventContext event :> IDiscordContext
match event.Id with match event.Id with
@ -271,10 +280,14 @@ type AdminBot() =
[<Option("message-id", "The ID of the message with all the reactions")>] messageId : string) = [<Option("message-id", "The ID of the message with all the reactions")>] messageId : string) =
enforceAdmin (DiscordInteractionContext ctx) (getUserInvitesFromReactions channel messageId) enforceAdmin (DiscordInteractionContext ctx) (getUserInvitesFromReactions channel messageId)
[<SlashCommandPermissions(Permissions.Administrator)>]
[<SlashCommand("admin-raffles-winners", "Get N Random Winners")>] [<SlashCommand("admin-raffles-winners", "Get N Random Winners")>]
member this.GetRaffleWinners (ctx : InteractionContext, [<Option("count", "How many winners to pick")>] count : int64) = member this.GetRaffleWinners (ctx : InteractionContext, [<Option("count", "How many winners to pick")>] count : int64) =
enforceAdmin (DiscordInteractionContext ctx) (getRaffleWinners count) enforceAdmin (DiscordInteractionContext ctx) (getRaffleWinners count)
// [<SlashCommand("admin-raffles-toggle", "Toggle availability of an item")>]
// member this.ToggleRaffle (ctx : InteractionContext, [<Option("enabled", "Enable or Disable?")>] enable : EnableDisable) =
// enforceAdmin (DiscordInteractionContext ctx) (toggleRaffleAvailability (enable = EnableDisable.Enable))