Forgot to mention my init-map fn:

(defn init-map [element]
  (let [options (h/clj->js {:zoom 1 :mapTypeId 
google.maps.MapTypeId.ROADMAP})
        parent-size (style/getSize (. element parentNode))
        element-size (style/getSize element)
        map (doto (google.maps.Map. element options)
              (. (setCenter (to-lat-lng *location*)))
              (. (setZoom 10)))]
    (style/setSize element (. element-size width) (. parent-size height))
    (events/listen
     viewport-monitor
     events/EventType.RESIZE
     (fn [event] (google.maps.event/trigger map "resize")))))

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to