                    (map throttled-options)
                    (remove (comp empty? :streaming-options)))]
   (println "----------------")
-  (print (format-results results)))
+  (print (format-results (reverse results))))

(kdb/defdb db sqll)
(kcore/defentity movies)

(def episode-ids
  (reduce
    (fn [ids record]
      (assoc

(def throttled-id (throttle-fn get-cisi-id 1 :second))

(defn assoc-cisi-id [ep]
  (let [ids (-> ep :episode-id movie-ids)]
    (cond
      (:cisi ids) (assoc ep :cisi-id (:cisi ids))
      (:imdb ids) (throttled-id ep (:imdb ids))
      ids (println "*** No IMDB ID found for" (:title ep) "***")
      (:episode-id ep) (do
                         (kcore/insert movies
                           (kcore/values {:episode_id (:episode-id ep)
                                          :title (:media-title ep)}))
                         (println "Adding empty entry for" (:title ep)))
      :else (println "Skipping" (:title ep)))))

