                                   :created (.getTime (js/Date.))
                                         ;:date #_(.getTime input-date)
                                   :type (if input-type-toggle :expense :income)
-                                  :value input-value}]
+                                  :value (-> input-value
+                                             js/parseFloat
+                                             (* 100)
+                                             js/Math.round)}]
                       (do
                         (om/transact! component `[(transactions/add ~new-tx)])
                         (om/update-state! component assoc :input-value nil)

      {:value value}
      {:value :not-found})))

(def process-tx-value
  (comp (remove nil?)
        (map

         #_(input-widget this "Date" :input-date :time)
         (type-toggle-widget this)
         (transaction-add-button this)]
        (transactions-widget list)]))))


(defn main [& args]
