    (let [canonical-url "http://www.mangahere.co"
          manga-url     (format "%s/manga" canonical-url)
          mangalist-url (format "%s/mangalist/" canonical-url)
-         manga-pattern (re-pattern (str manga-url "(.*?)/"))
-         link->map (gen-link->map identity identity)]
+         manga-pattern (re-pattern (str manga-url "/(.*?)/"))
+         link->map (gen-link->map second identity)]
      {:id :manga-here
       :name "Manga Here"
       :comic->url (fn [comic-id]

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


            [clojure.string :as s]))

(defn gen-link->map [process-name process-url]
  (fn [{name :content
        {url :href} :attrs}]
    {:name (process-name name)
     :url (process-url url)}))
