   [(let [canonical-url "http://mangafox.me"
          manga-url (format "%s/manga/" canonical-url)
          manga-pattern (re-pattern (str manga-url "(.*?)/"))
-         link->map (comp (gen-add-id-from-url manga-pattern)
-                         (gen-link->map identity identity))]
+         link->map (gen-link->map identity identity)]
      {:id :manga-fox
       :name "Manga Fox"
 

                    (str canonical-url "/" comic-id))
      :comic-list-data {:url (str canonical-url "/alphabetical")
                        :selector [:div.series_alpha :ul :li :a]
                        :normalize link->map}
      :chapter-list-data-for-comic
      (fn [comic-url]
        {:url comic-url


   (let [canonical-url "http://www.mangareader.net"
         manga-pattern (re-pattern (str canonical-url "/(.*)$"))
         link->map (gen-link->map s/trim
                                  (partial str canonical-url))]
     {:id :manga-reader
      :name "Manga Reader"

