Remove commented-out dead code, fix bad call to notifyPlayers (that still takes the logs as second argument)
This commit is contained in:
parent
65da786c69
commit
7b0d873558
1 changed files with 1 additions and 7 deletions
|
@ -38,12 +38,6 @@ receive (Message.Tadaima {Message.myID, Message.name}) Nothing = do
|
||||||
|
|
||||||
receive (Message.Tadaima {}) (Just _) = sendError "You're already logged in"
|
receive (Message.Tadaima {}) (Just _) = sendError "You're already logged in"
|
||||||
|
|
||||||
{-
|
|
||||||
receive logOut@Message.LogOut (Just _) = do
|
|
||||||
asks App.sessionID >>= App.update . Server.logOut
|
|
||||||
Messaging.relay logOut Messaging.broadcast
|
|
||||||
-}
|
|
||||||
|
|
||||||
receive invitation@(Message.Invitation {Message.to}) (Just _) =
|
receive invitation@(Message.Invitation {Message.to}) (Just _) =
|
||||||
Messaging.relay invitation (Messaging.sendTo [to])
|
Messaging.relay invitation (Messaging.sendTo [to])
|
||||||
|
|
||||||
|
@ -52,7 +46,7 @@ receive answer@(Message.Answer {Message.accept, Message.to}) (Just player) =
|
||||||
then do
|
then do
|
||||||
publicGames <- Game.new (Player.playerID player, to)
|
publicGames <- Game.new (Player.playerID player, to)
|
||||||
Messaging.relay answer (Messaging.sendTo [to])
|
Messaging.relay answer (Messaging.sendTo [to])
|
||||||
Messaging.notifyPlayers publicGames
|
Messaging.notifyPlayers publicGames []
|
||||||
else Messaging.relay answer (Messaging.sendTo [to])
|
else Messaging.relay answer (Messaging.sendTo [to])
|
||||||
|
|
||||||
receive (Message.Play {Message.move, Message.onGame}) (Just player) = do
|
receive (Message.Play {Message.move, Message.onGame}) (Just player) = do
|
||||||
|
|
Loading…
Reference in a new issue