   (if-let [api-key (cfg/get-api-key)]
     (time
      (let [video-ids    ["7lCDEYXw3mM" "MjtOzLfebgY" "6QIw1BQIvT4" "2xJWQPdG7jE"]
-           n-times      (query-count video-ids)
-           promises-ch  (enq-fetches api-key video-ids)
-           responses-ch (enq-responses promises-ch n-times)]
-       (deq-responses responses-ch n-times)
-       (async/close! promises-ch)
-       (async/close! responses-ch)
+           promise-ch   (enq-fetches api-key video-ids)
+           response-ch  (chan)]
+       (enq-responses promise-ch response-ch)
+       (deq-responses response-ch)
+       (while true)
        ))))
 

  (->> (async/to-chan video-ids)
       (async/partition IDS_PER_QUERY)
       (async/map< #(uris/mk-video-uri api-key %))
       ;; http://http-kit.org/client.html
       (async/map< http/get)))

;; Could also do this?

             ;; [com.keminglabs.zmq-async.core :refer [register-socket!]]
            [org.httpkit.client :as http]
            [clojure.core.async
             :refer [chan go partition map< split >! <! take! alts! alts!!]
             :as async]))

(def BASE_URI "https://www.googleapis.com/youtube/v3/videos")
