fix: worker-repl

This commit is contained in:
Tienson Qin
2025-09-02 13:26:39 +08:00
parent d4217fba89
commit 28fbfa8f07

View File

@@ -18,27 +18,11 @@
;; Get the runtime id from http://localhost:9630/runtimes, pick the one which shows `browser-worker`
(defn worker-repl
([]
(worker-repl :old))
([runtime-id-or-which]
(assert runtime-id-or-which "runtime-id shouldn't be empty")
(if
(number? runtime-id-or-which)
(do (prn :worker-runtime-id runtime-id-or-which)
(api/repl :workers {:runtime-id runtime-id-or-which}))
(let [runtime-ids (->> (api/repl-runtimes :workers)
(filter (fn [runtime] (= :browser-worker (:host runtime))))
(map :client-id))
runtime-id (apply (if (= :old runtime-id-or-which) min max) runtime-ids)]
(worker-repl runtime-id)))))
(defn mobile-worker-repl
[]
(when-let [runtime-id (->> (api/repl-runtimes :mobile)
(filter (fn [runtime] (= :browser-worker (:host runtime))))
(map :client-id)
(apply max))]
(api/repl :mobile {:runtime-id runtime-id})))
(let [runtime-id (->> (api/repl-runtimes :db-worker)
(map :client-id)
first)]
(api/repl :db-worker {:runtime-id runtime-id})))
(defn runtime-id-list
[app]