diff options
Diffstat (limited to 'server/lib/Uplcg/Game.hs')
-rw-r--r-- | server/lib/Uplcg/Game.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/server/lib/Uplcg/Game.hs b/server/lib/Uplcg/Game.hs index 02e40cb..140f2b6 100644 --- a/server/lib/Uplcg/Game.hs +++ b/server/lib/Uplcg/Game.hs @@ -157,7 +157,7 @@ leaveGame pid game = case game ^? gamePlayers . ix pid of blackCardBlanks :: Cards -> BlackCard -> Int blackCardBlanks cards (BlackCard c) = - maybe 0 (length . T.breakOnAll "\\BLANK") $ cardsBlack cards V.!? c + maybe 0 (length . T.breakOnAll "_") $ cardsBlack cards V.!? c maximaOn :: Ord o => (a -> o) -> [a] -> [a] maximaOn f = \case [] -> []; x : xs -> go [x] (f x) xs |