     (val ($ "#hour") (pad hour))
     (val ($ "#minute") (pad (.getMinutes datetime)))
     (val ($ "#meridian") meridian)
-    (println (.toString datetime))
     (.datepicker ($ "#datepicker") "update" datetime)))
 
 (add-watch selected-time :_ on-selected-time-change)


(defn init-snapshot-list []
  (->> (.-SNAPSHOT_LIST js/window) ; server injected to this in a <script>
       ; (js->clj)
       ; (clojure.walk/keywordize-keys)
       (reset! snapshot-list)))


        new-time (doto selected-date
                    (.setMinutes (.getMinutes datetime))
                    (.setHours (.getHours datetime)))]
    (reset! selected-time (.getTime new-time))
    (show-closest-snapshot!)))

