near/computersandblues.lodestone
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix bug in promise-all

Browse source
This commit is contained in:
arne 2025-11-19 20:49:57 +01:00
commit b7fce71a17
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/computersandblues/lodestone/app.cljs
View file

@ -35,7 +35,7 @@
;; Mastodon API helpers ;; Mastodon API helpers
(defn- promise-all [xs] (defn- promise-all [xs]
(js/Promise.all (clj->js xs))) (js/Promise.all (apply array xs)))
(defn- promise-resolve [val] (defn- promise-resolve [val]
(js/Promise.resolve val)) (js/Promise.resolve val))
@ -178,7 +178,7 @@
(.then (fn [application] (.then (fn [application]
(let [code (oauth-authorization-code (.-location js/window))] (let [code (oauth-authorization-code (.-location js/window))]
(cond (cond
(:bearer_token application) (js/Promise.resolve application) (:bearer_token application) application
(and application code) (and application code)
(handle-oauth-authorization-code! (handle-oauth-authorization-code!