Parallel json loading in CLJS

ajax.cljs

(defn load-json-channels-in-parallel
  [channels]
  (let [ch (chan)]
    (go
      (loop [open-channels channels
             data {}]
        (if (empty? open-channels)
          (do
            (>! ch data)
            (close! ch))
          (let [[json c] (alts! (vals open-channels))
                chan-key (get-key-for-value open-channels c)]
            (recur
              (dissoc open-channels chan-key)
              (assoc data chan-key json))))))
    ch))

ajax.js

$.when([$.ajax(), $.ajax(), $.ajax()]).then(function() {

})