From 7c3e41979478d6826f73a956a26c967aae1687a2 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Mon, 16 Jun 2025 03:33:52 -0400 Subject: fig-utils: Guile FFI --- fig-web/src/Fig/Web/Secure.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'fig-web/src/Fig/Web/Secure.hs') diff --git a/fig-web/src/Fig/Web/Secure.hs b/fig-web/src/Fig/Web/Secure.hs index 303089b..20b16c5 100644 --- a/fig-web/src/Fig/Web/Secure.hs +++ b/fig-web/src/Fig/Web/Secure.hs @@ -17,6 +17,7 @@ import Fig.Web.Auth import qualified Fig.Web.DB as DB import qualified Fig.Web.Module.Exchange as Exchange import qualified Fig.Web.Module.Redeem as Redeem +import qualified Fig.Web.Module.Puzzle as Puzzle allBusEvents :: SecureModuleArgs -> BusEventHandlers allBusEvents args = busEvents . mconcat $ fmap ($ args) @@ -68,5 +69,6 @@ app args = do respondText $ creds.user <> " " <> creds.twitchId Exchange.secure args Redeem.secure args + Puzzle.secure args Sc.notFound do respondText "not found" -- cgit v1.2.3