 
 (defn display-focus-ids [ids]
   (when (not-empty ids)
-    (println "Focusing on build ids:" (string/join ", " ids))))
+    (repl-println "Focusing on build ids:" (string/join ", " ids))))
 
 (defn builder-running? [state-atom]
   (not (nil? (:autobuilder @state-atom))))

  (-print-stacktrace [repl-env stacktrace error build-options]
    (doseq [{:keys [function file url line column]}
              (cljs.repl/mapped-stacktrace stacktrace build-options)]
      (println "\t" (str function " (" (str (or url file)) ":" line ":" column ")")))))

(defn repl-env
  ([figwheel-server {:keys [id build-options] :as build}]


(defn validate-build-ids [ids all-builds]
  (let [bs (set (keep :id all-builds))]
    (vec (keep #(if (bs %) % (repl-println "No such build id:" %)) ids))))

(defn get-ids [ids focus-ids all-builds]
  (or (and (empty? ids) focus-ids)
