       (game-chat-process game-uuid
                          player1-id
                          player1-chan
+                         player1-name
                          player2-id
-                         player2-chan))))
+                         player2-chan
+                         player2-name))))

          (do (c/write-cmd-to-chs
               [p1-ch p2-ch]
               {:type :chat-message-response
                :data {:player-id p1-id
                       :message (get-in value [:data :message])
                       }}
               true)

          (do (c/write-cmd-to-chs
               [p1-ch p2-ch]
               {:type :chat-message-response
                :data {:player-id p2-name
                       :message (get-in value [:data :message])}}
               true)
              (recur)))))))
