 (defn set-active-serial [serial-id active-content-index]
   (assoc active-content-index 0 serial-id))
 
+(defn set-active-season [season-id active-content-index]
+  (assoc active-content-index 1 season-id))
+
+(defn set-active-chapter [chapter-id active-content-index]
+  (assoc active-content-index 2 chapter-id))
+
 ;; TODO: think about lenses
 
 (defn save-apply [& args]

    (-> db
        (assoc-in [:translate :show?] false))))

(register-handler
  :reset-seasons-and-chapter
  (fn [db _]

   (fn [chapters]
     (-> chapters
         (update (-> index (rest) (rest) (first)) updater)))))

;; -------- Content loading -----------

(defn load-if-not-exist
  ([getter load-fn on-loaded]
