       [:button.btn.btn-default {:on-click hide-picker}
        "Cancel"]]]))
 
-(defn faction-settings [{:keys [conn dispatch] :as app}]
+(defn faction-settings [{:as views-ctx :keys [conn dispatch]}]
   (with-let [faction (subs/faction-to-configure conn)
              selected-player-type (r/atom nil)
              hide-settings #(do

                :title "Configure faction"}]]]))))

;; TODO: cleanup unit-picker
(defn unit-picker [{:keys [conn dispatch] :as app}]
  (let [unit-types @(subs/available-unit-types conn)
        cur-faction @(subs/current-faction conn)
        color (name (:faction/color cur-faction))

      " · "
      (str "Round " round)]]))

(defn faction-actions [{:as view-ctx :keys [conn dispatch]}]
  ;; TODO: replace query with something from subs ns
  (let [[round current-color] (-> @(posh/q '[:find ?round ?current-color
                                             :where
