From 90a8dd5d6a164f0ea981c7df336a17059e5378dc Mon Sep 17 00:00:00 2001 From: Simon Brooke Date: Sun, 22 Jul 2018 17:49:38 +0100 Subject: [PATCH] I --- src/cljs/youyesyet/canvasser_app/views/map.cljs | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/cljs/youyesyet/canvasser_app/views/map.cljs b/src/cljs/youyesyet/canvasser_app/views/map.cljs index 5aa8c40..217a8dc 100644 --- a/src/cljs/youyesyet/canvasser_app/views/map.cljs +++ b/src/cljs/youyesyet/canvasser_app/views/map.cljs @@ -81,6 +81,12 @@ :maxZoom 18})) view) (dispatch-sync [:set-view view]) + (.on view "moveend" + (fn [_] (let [c (.getCenter view)] + (js/console.log (str "Moving centre to " c)) + (dispatch :set-latitude (.-lat c)) + (dispatch :set-longitude (.-lon c)) + (dispatch :fetch-locality)))) (refresh-map-pins) view))