             statement (:statement data)
             author (:author data)]
         (dom/div #js {:className "bs-callout bs-callout-info"}
-                 (dom/a #js {:href    "javascript:void(0)"
-                             :onClick #(com/ajax-get-and-change-view (:url statement) :default)}
+                 (dom/a #js {:href "javascript:void(0)"
+                             :onClick #(lib/change-view! :reference-agree-disagree)
+                             ;:onClick #(com/ajax-get-and-change-view (:url statement) :default)
+                             }
                         (dom/strong nil (:text statement)))
                  (dom/div nil "Issue: " (:title issue))
                  (dom/div nil "Author: " (:nickname author)))))))

      (let [usages (get-reference-usages-from-app-state)]
        (dom/div nil
                 (apply dom/div nil
                        (map #(om/build usage-view (lib/merge-react-key %)) usages)))))))
            [discuss.communication :as com]
            [discuss.config :as config]
            [discuss.sidebar :as sidebar]
            [discuss.utils.common :as lib]
            [discuss.utils.views :as vlib]))

(defn- get-reference-usages-from-app-state
  "Return list of reference usages, which were previously stored in the app-state.
