     {:marker marker :icon icon :pos pos :id (:id point)}))
 
 (defn add-markers [data owner units]
-  (let [map (om/get-state owner :map)
-        units (filter (comp not empty? :pos) units)]
+  (let [map (om/get-state owner :map)]
     (om/update-state! owner :markers
       #(into % (for [unit units]
                  (mark-it! data owner map unit))))))


(defn reset-markers [owner]
  (let [markers (om/get-state owner :markers)]
    (.log js/console (pr-str markers))
    (dorun
      (map #(.setIcon (:marker %) (reset-ico (:icon %))) markers))))



    om/IWillReceiveProps
    (will-receive-props [this {:keys [collections] :as next-props}]
      (let [next-units (set/select (comp not empty? :pos)
                         (reduce into #{}
                           (map :points collections)))
            current-units (set/select (comp not empty? :pos)
                            (reduce into #{}
                              (map :points (:collections (om/get-props owner)))))
            to-add (set/difference next-units current-units)
            to-delete (set/difference current-units next-units)]

        (delete-markers owner to-delete)
        (add-markers data owner to-add)
        (reset-markers owner)
        (when (re-matches #"/collections/(\d+)/points/(\d+)" (:route-name next-props))
