diff options
| author | LLLL Colonq <llll@colonq> | 2026-01-03 21:59:46 -0500 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2026-01-03 21:59:46 -0500 |
| commit | ff02141235d1dbec3492c5a7b49631fe440c4806 (patch) | |
| tree | 96fb1e2dd08d6b97ddf251e971c5845957692ce9 /fig-web/src/Fig/Web/Public.hs | |
| parent | be79bc5f0a1435a8ba34b163218a44b93cca503d (diff) | |
web: Add Shindigs sorting endpoints
Diffstat (limited to 'fig-web/src/Fig/Web/Public.hs')
| -rw-r--r-- | fig-web/src/Fig/Web/Public.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/fig-web/src/Fig/Web/Public.hs b/fig-web/src/Fig/Web/Public.hs index 89602bb..975a161 100644 --- a/fig-web/src/Fig/Web/Public.hs +++ b/fig-web/src/Fig/Web/Public.hs @@ -27,6 +27,7 @@ import qualified Fig.Web.Module.Shader as Shader import qualified Fig.Web.Module.HLS as HLS import qualified Fig.Web.Module.TCG as TCG import qualified Fig.Web.Module.Debt as Debt +import qualified Fig.Web.Module.ShindigsSorting as ShindigsSorting allBusEvents :: PublicModuleArgs -> BusEventHandlers allBusEvents args = busEvents . mconcat $ fmap ($ args) @@ -98,10 +99,12 @@ app args = do HLS.public args TCG.public args Debt.public args + ShindigsSorting.public args websocket $ mconcat [ Gizmo.publicWebsockets args , Circle.publicWebsockets args , Model.publicWebsockets args + , ShindigsSorting.publicWebsockets args ] Sc.notFound do respondText "not found" |