           msg (aget input-el "value")]
 
       ;; TODO: send chat message here
-      (util/log (str "chat message: " msg))
+      ;;(util/log (str "chat message: " msg))
+      (socket/send-chat msg)
 
       (aset input-el "value" ""))))
 

    [cljs.reader :refer [read-string]]
    hiccups.runtime
    client.game.core
    [client.dom :as dom]
    [client.socket :as socket]
    [client.util :as util]))

(defn cleanup
  []

  (remove-watch client.state/chat :game-screen)

  ; Leave the game room.
  (socket/emit "leave-game")

