 
 (defn init-snapshot-list []
   (->> (.-SNAPSHOT_LIST js/window) ; server injected to this in a <script>
-        (js->clj)
-        (clojure.walk/keywordize-keys)
-        (reset! snapshot-list)))
+       (js->clj)
+       (clojure.walk/keywordize-keys)
+       (reset! snapshot-list)))
 
 (defn init-snapshot-index []
   (let [image (attr ($ "#currentSnapshot") "src")

    (reset! snapshot-index display-index)))

(defn set-url! [timestamp]
  (let [base-url (.split js/document.URL "?")
        new-url (str base-url "?time=" timestamp)]
    (.replaceState js/history nil nil new-url)))


  (on ($ js/document) "keydown" on-keydown)

  (-> ($ "body")
    (on "click" ".timepicker-widget a" (fn [e] (.preventDefault e)))
    (on "click" ".toggle-meridian" click-toggle-meridian)
    (on "click" ".decrement-hour" click-decrement-hour)
    (on "click" ".increment-hour" click-increment-hour)
