diff options
| author | LLLL Colonq <llll@colonq> | 2025-09-16 14:11:11 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-09-16 14:11:11 -0400 |
| commit | c9b9b64d2bc50011bb425bc34c95e8dcb443d4ae (patch) | |
| tree | 2b043833c21c82f9d9f0217ddd307bdcfee2f697 /src/Main/Menu.purs | |
| parent | 186e4aecb10b846767506ed05ab6be5016dcaafd (diff) | |
Add soundboard
Diffstat (limited to 'src/Main/Menu.purs')
| -rw-r--r-- | src/Main/Menu.purs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Main/Menu.purs b/src/Main/Menu.purs index 58364b6..0fc5fe1 100644 --- a/src/Main/Menu.purs +++ b/src/Main/Menu.purs @@ -3,6 +3,7 @@ module Main.Menu where import Prelude import Data.Foldable (for_) +import Data.Tuple (Tuple(..)) import Effect (Effect) import Effect.Aff (launchAff_) import Effect.Class (liftEffect) @@ -19,4 +20,5 @@ main = launchAff_ do boxes <- queryAll ".lcolonq-menu-box" for_ boxes \box -> do listen box "click" \_ev -> do - UI.submitRedeem box + Tuple redeem inp <- UI.menuRedeemData box + UI.submitRedeem redeem inp |