                     :padding-right  10}}
       [touchable-highlight
        {:style    (merge defaults {:background-color "green"})
-        :on-press #(let [put-fn @put-fn-atom
-                         new-entry (p/parse-entry (:md @local))
+        :on-press #(let [new-entry (p/parse-entry (:md @local))
                          new-entry-fn (h/new-entry-fn put-fn new-entry nil)]
                      (new-entry-fn)
                      (swap! local assoc-in [:md] ""))}

            [cljs.pprint :as pp]
            [meo.helpers :as h]
            [meo.utils.parse :as p]))

(defonce put-fn-atom (r/atom nil))

(def ReactNative (js/require "react-native"))
(def react-native-camera (js/require "react-native-camera"))

                      :text-align    "center"}}
        (str (count @entries) " entries")]

       [menu-bar local put-fn]

       (when-let [barcode (:barcode @local)]
         [text {:style {:font-size     10
