I
This commit is contained in:
parent
ea89e37d77
commit
90a8dd5d6a
|
@ -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))
|
||||
|
||||
|
|
Loading…
Reference in a new issue