fixed error.

This commit is contained in:
Bryce Covert
2019-04-26 13:26:07 -07:00
parent 598da0f322
commit 3c25a85f52
2 changed files with 10 additions and 2 deletions

View File

@@ -125,7 +125,6 @@
]
(r/create-class
{:reagent-render (fn [{:keys [matches on-change disabled match->text field value class not-found-description]}]
(println "RENDERING ZZ" value)
(let [select (fn [entity]
(when on-change
(if (= :not-found entity)
@@ -134,7 +133,7 @@
text-atom text
text (or (when value (match->text value)) @text)
valid-matches (get-valid-entity-matches matches not-found-description not-found-value text match->text)]
(println "TEXT" value (match->text value) text)
[:div.typeahead
(if disabled

View File

@@ -101,6 +101,15 @@
submit-query)
;; EVENTS
(re-frame/reg-event-db
::adding
(fn [db [_ new]]
(let [locations @(re-frame/subscribe [::subs/locations-for-client (:client-id new)])]
(-> db (forms/start-form ::form (assoc new :expense-accounts
(expense-accounts-field/from-graphql (:expense-accounts new)
0.0
locations)))))))
(re-frame/reg-event-db
::editing
(fn [db [_ which]]