diff options
author | Jasper Van der Jeugt | 2020-07-31 17:13:37 +0200 |
---|---|---|
committer | Jasper Van der Jeugt | 2020-07-31 17:13:37 +0200 |
commit | e3a2052522471d39e410f4ea13d51d3d18f52b80 (patch) | |
tree | 7d1500a70b22e767cc678700fc6fe3cbd7cfc9f9 /server/lib/Cafp/Messages.hs | |
parent | 323ca81c96e4186747f06b6178d71d49e98c6066 (diff) |
Multiple \BLANK in black cards
Diffstat (limited to 'server/lib/Cafp/Messages.hs')
-rw-r--r-- | server/lib/Cafp/Messages.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/server/lib/Cafp/Messages.hs b/server/lib/Cafp/Messages.hs index dc17168..1b37380 100644 --- a/server/lib/Cafp/Messages.hs +++ b/server/lib/Cafp/Messages.hs @@ -29,7 +29,7 @@ data Opponent = Opponent } deriving (Show) data TableView - = Proposing BlackCard (Maybe WhiteCard) + = Proposing BlackCard [WhiteCard] deriving (Show) data GameView = GameView @@ -48,7 +48,7 @@ data ServerMessage data ClientMessage = ChangeMyName Text - | ProposeWhiteCards WhiteCard -- TODO: Needs to be a list? + | ProposeWhiteCards [WhiteCard] deriving (Show) deriveBoth defaultOptions ''BlackCard |