           (reset! waypoint wp)))
       :reagent-render
       (fn [site location {:keys [tag]}]
+        (.log js/console "Render.")
         tag)})))
 
 (defn reader []

(defn img-component [site
                     {:keys [comic]}
                     {:keys [chapter page tag]}]
  (let [waypoint (clojure.core/atom nil)]
    (reagent/create-class
     {:component-did-mount
      (fn [this]
        (let [wp (js/Waypoint.
                  #js {:element (reagent/dom-node this)
                       :offset "bottom-in-view"

      (when-let [site-list @site-list]
        [:div
         [:ul (map (id-btn-for-callback
                    #(r/go-to (r/comics-path
                               {:site (name (:id %))})))
                   site-list)]]))))

(defn comic-list []
