notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

fixed error.

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

3
src/cljs/auto_ap/views/components/typeahead.cljs
View File

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

9
src/cljs/auto_ap/views/pages/invoices/form.cljs
View File

@@ -101,6 +101,15 @@
submit-query) submit-query)
;; EVENTS ;; 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 (re-frame/reg-event-db
::editing ::editing
(fn [db [_ which]] (fn [db [_ which]]