aboutsummaryrefslogtreecommitdiff
path: root/server/lib/Cafp/Messages.hs
diff options
context:
space:
mode:
Diffstat (limited to 'server/lib/Cafp/Messages.hs')
-rw-r--r--server/lib/Cafp/Messages.hs4
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