Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (ns bus.ios.core
- (:require [bus.common.ui :refer [app-registry text map-view view]]
- [bus.common.util :refer [alert]]
- [reagent.core :as r :refer [atom]]
- [re-frame.core :refer [subscribe dispatch dispatch-sync]]
- [bus.events]
- [bus.subs]))
- (defn app-root []
- (fn []
- [view {:style {:flex 1 :flex-direction "column" :padding 20}}
- [map-view {:style {:flex 1}
- :initialRegion {:latitude 37.78825
- :longitude -122.4324
- :latitudeDelta 0.0922
- :longitudeDelta 0.0421}
- :onRegionChange alert}]]))
- (defn init []
- (dispatch-sync [:initialize-db])
- (.registerComponent app-registry "bus" #(r/reactify-component app-root)))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement