     (catch Exception e 0.0)))
 
 (defn- remove-comma [s]
-  (str/replace-first s "," ""))
+  (string/replace-first s "," ""))
 
 (defn imdb-rating-count [dp]
   (try
     (->> dp
-         (h/select (h/descendant
-                     (h/id :ratings-bar)
-                     h/first-child
-                     (h/class :inline-block)
-                     (h/class :text-muted)))
+         (hickory/select (hickory/descendant
+                           (hickory/id :ratings-bar)
+                           hickory/first-child
+                           (hickory/class :inline-block)
+                           (hickory/class :text-muted)))
          first
          :content
          last


(defn imdb-title [sp]
  (->> sp
       (h/select (h/descendant
                   (h/class :posters)
                   (h/class :poster)
                   (h/class :title)
                   (h/tag :a)))
       first
       :content
       first))

(defn imdb-url [sp]
  (->> sp
       (h/select (h/descendant
                   (h/class :posters)
                   (h/class :poster)
                   (h/class :title)
                   (h/tag :a)))
       (mapv :attrs)
       (mapv :href)
       first

            (fn [{:keys [status body error]}]
              (if error
                (let [{cause :cause} (Throwable->map error)]
                  (async/put! error-ch (error-message url cause)))
                (if (> status 399)
                  (async/put! error-ch (error-message url status))
                  (async/put! result-ch (as-hickory (parse body))))))))

(defn fetch-yorck-list [result-ch error-ch]
  (async-get (str yorck-base-url "/filme?filter_today=true") result-ch error-ch))
