diff -r f4c8c6a174e8 -r 5f62417a7d84 gameServer/Actions.hs --- a/gameServer/Actions.hs Sat Sep 01 00:05:55 2018 +0200 +++ b/gameServer/Actions.hs Sat Sep 01 00:17:56 2018 +0200 @@ -733,9 +733,9 @@ processAction (Random chans items) = do - let i = if null items then ["heads", "tails"] else items + let i = if null items then [loc "heads", loc "tails"] else items n <- io $ randomRIO (0, length i - 1) - processAction $ AnswerClients chans ["CHAT", nickRandom, i !! n] + processAction $ AnswerClients chans ["CHAT", if null items then nickRandomCoin else nickRandomCustom, i !! n] processAction (LoadGhost location) = do