From 7a07562c61091178e540803a8c70ce5d088c5dfa Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 14 Apr 2026 02:03:08 -0400 Subject: Get all cards by userid --- fig-web/src/Fig/Web/Module/TCG.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'fig-web/src/Fig/Web') diff --git a/fig-web/src/Fig/Web/Module/TCG.hs b/fig-web/src/Fig/Web/Module/TCG.hs index 4f7c094..d6b68fd 100644 --- a/fig-web/src/Fig/Web/Module/TCG.hs +++ b/fig-web/src/Fig/Web/Module/TCG.hs @@ -50,3 +50,7 @@ public a = do body_ do forM_ cards $ \c -> do img_ [src_ $ mconcat ["/api/tcg/card/", decodeUtf8 c, ".png"]] + onGet "/api/tcg/cards/:userid" do + userid <- pathParam "userid" + cards <- DB.run a.db (DB.lrange ("tcg-inventory:" <> userid) 0 (-1)) + respondText . Text.unlines $ decodeUtf8 <$> cards -- cgit v1.2.3