         month (inc (.getMonth goog-date))
         month (if (> 10 month) (str 0 month) (str month))
         day (.getDate goog-date)
-        day (if (> 10 day) (str 0 day) (str day))
-        ;1996-12-19T16:39:57
-        ]
+        day (if (> 10 day) (str 0 day) (str day))]
     (str year "-" month "-" day)))
 
 (defn time-string []

  [{:keys [name image slot-category measurement previous next
           rep set performed-sets distance duration weight rest] :as m}
   part-number]
  (let [;parts (session/get-in [:movement-session :parts])
        ;position-in-parts (first (positions #{title} (map :title parts)))
        expand (atom false)]
    (fn []
      [:div.pure-g.movement #_{:id (str "m-" id)}

    (str hours ":" minutes ":" seconds)))

(defn date-component []
  (let [date-value (session/get-in [:movement-session :date])]
    (session/assoc-in! [:movement-session :date] date-value)
    [:input {:style     {:float 'right} :id "date" :name "date" :type "date"
