    (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://www.mangareader.net"
         manga-pattern (re-pattern (str canonical-url
                                        "/(.*)(\\.html)?$"))
         link->map (gen-link->map s/trim
                                  (partial str canonical-url))]
     {:id :manga-reader
      :name "Manga Reader"

  [(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 first identity)]
     {:id :manga-fox
      :name "Manga Fox"

