 
     om/IWillMount
     (will-mount [_]
-      (println "Mounting game")
       (go
         (>! (:channel (first (om/get-state owner :instances)))
-            "MESSAGE"))
-      (let [instances (om/get-state owner :instances)]
-        (println "There are instances:" (count instances))
-        )
-
-      )
+            "MESSAGE")))
 
     om/IRender
     (render [_]

          (if (= i 18)
            (do
              (om/set-state! slide :message nil)
              (println "to is" to)
              (>! (get-in instances [to :channel]) "MESSAGE"))
            (recur (inc i)))
          )))


        (go-loop [i 0]
          (<! (timeout 1))
          (om/set-state!
           slide :message
           [(+ (first from-pos) (* i xdelta))
