 
 (defn get-season-by-index [content index]
   (-> (get-seasons-by-index content index)
-      (nth (-> index (rest) (first)))))
+      (save-apply nth (-> index (rest) (first)))))
 
 (defn get-chapters-by-index [content index]
   (-> (get-season-by-index content index)


;; TODO: think about lenses

(defn get-serial-by-index [content index]
  (-> content
      (nth (first index))))

(defn get-seasons-by-index [content index]
  (-> (get-serial-by-index content index)

      (load-if-not-exist
       (partial get-chapters-by-index active-content)
       (fn [[_ {path :path}]]
         (rdb/download-json remote-db path))
       (fn [chapters]
         (dispatch [:chapter-load 0 (nth chapters 0)])
         (dispatch [:chapters-load-success chapters])))
      (.catch (fn [err]
                (if (= (.-message err) "Network request failed")
                  (dispatch [:show-network-error])
