diff options
| author | LLLL Colonq <llll@colonq> | 2025-11-21 17:36:05 -0500 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-11-21 17:36:05 -0500 |
| commit | 4086896975a3b041da4cf3be4cd959ce92f8aade (patch) | |
| tree | e7de3644b78de3066ae991a6d25638612a7b6f62 /fig-web/src/Fig/Web | |
| parent | a69da398584644daf975db58a3ff893d29d155eb (diff) | |
web: Only serve 20 cards
Diffstat (limited to 'fig-web/src/Fig/Web')
| -rw-r--r-- | fig-web/src/Fig/Web/Module/TCG.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fig-web/src/Fig/Web/Module/TCG.hs b/fig-web/src/Fig/Web/Module/TCG.hs index 0636ad7..d1bc4fb 100644 --- a/fig-web/src/Fig/Web/Module/TCG.hs +++ b/fig-web/src/Fig/Web/Module/TCG.hs @@ -27,7 +27,7 @@ public a = do respondBytes image onGet "/api/tcg/binder/:userid" do userid <- pathParam "userid" - cards <- DB.lrange a.db ("tcg-inventory:" <> userid) 0 (-1) + cards <- take 20 <$> DB.lrange a.db ("tcg-inventory:" <> userid) 0 (-1) respondHTML do head_ do title_ "LCOLONQ: The Game" |