         [:form {:on-submit #(send-msg % owner)}
          [:input {:ref "msg-input" :placeholder "Say something"}]]]))))
 
-(defn remote-list []
-  (map #(str "Server " %) (-> (get-in @game-state [:corp :servers :remote]) count range reverse)))
+(defn remote-list [remotes]
+  (map #(str "Server " %) (-> remotes count range reverse)))
 
 (defn handle-dragstart [e cursor]
   (-> e .-target js/$ (.addClass "dragged"))

       (when current-strength [:div.darkbg.strength current-strength])
       (when (and (= zone ["hand"]) (#{"Agenda" "Asset" "ICE" "Upgrade"} type))
         (let [centrals ["HQ" "R&D" "Archives"]
               remotes (conj (remote-list) "New remote")
               servers (case type
                         ("Upgrade" "ICE") (concat remotes centrals)
                         ("Agenda" "Asset") remotes)]

               opponent ((if (= side :corp) :runner :corp) cursor)]
           [:div.gameboard
            [:div.mainpane
             (om/build zones {:player me :remotes (get-in cursor [:corp :servers :remote])})
             [:div.centralpane
              [:div.leftpane
               [:div
