 
 ;;; Real functions
 
+
+;; ############################################################
+;; ## Get Comic List Functions
+;; ############################################################
+
 (defn manga-url []
   (format (manga-url-format) (root-url)))
 

                  {url :href} :attrs}]
  {:name ((link-name-normalize) name)
   :url  ((link-url-normalize)  url)})

(defn extract-image-tag [html]
  (scrape/extract-image-tag html (image-selector)))

                         (page-list-selector)
                         normalize)))

(defn get-page-list [comic-chapter]
  (let [chapter-url (:url comic-chapter)]
    (-> chapter-url
        scrape/fetch-url
        (extract-pages-list chapter-url))))


;; ############################################################
;; ## Get Image Data functions
;; ############################################################

(defn get-image-data [comic-id chapter page]
  [])
