From d034b9c9273a7f3ff91554c4b605dd488207caa1 Mon Sep 17 00:00:00 2001 From: Frederick Yin Date: Mon, 9 Jan 2023 11:08:02 +0800 Subject: Display player's cards in color --- Game.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Game.hs') diff --git a/Game.hs b/Game.hs index b9ad8bd..69c1d08 100644 --- a/Game.hs +++ b/Game.hs @@ -33,7 +33,7 @@ beginTurn game@(Game plyrs pidx att dir prev stock disc) = do putStrLn $ replicate 80 '-' putStrLn $ P.name player ++ "'s turn (input 0 to skip turn and draw card)" - putStrLn $ P.showCards player + putStrLn $ P.showCards player prev putStrLn $ "Current attack: " ++ show att putStrLn $ "Prev card: " ++ C.showCard prev -- cgit v1.2.3