o evento parece certa ... o button manda o valor coreto, e o db esta …

…sendo atualizada ... mas nao ta atualizando a tela
calangohc · Jul 5, 2018 · 22e9a50 · 22e9a50
1 parent 883a514
commit 22e9a50
Show file tree

Hide file tree

Showing 3 changed files with 16 additions and 19 deletions.
diff --git a/src/cljs/contascalangos/events.cljs b/src/cljs/contascalangos/events.cljs
@@ -17,10 +17,7 @@
 
 (re-frame/reg-event-db
 :adicionar
-(fn [coeffects event]
-  (let [db (:db coeffects)
-  	    novo-valor (second event)
-  	    itens (:orcamento db)]
-  	    {:db (assoc db :orcamento (cons novo-valor itens))}
-  	)
- ))
+(fn [db event]
+  (let [novo-valor (second event)
+        itens (:orcamento db)]
+    {:db (assoc db :orcamento (cons novo-valor itens))} )))
diff --git a/src/cljs/contascalangos/subs.cljs b/src/cljs/contascalangos/subs.cljs
@@ -9,7 +9,7 @@
 
 (re-frame/reg-sub
 ::orc
-(fn [db] (:orcamento db))
+(fn [db _] (:orcamento db))
 )
 
 (re-frame/reg-sub

diff --git a/src/cljs/contascalangos/views.cljs b/src/cljs/contascalangos/views.cljs
@@ -16,17 +16,17 @@
        [:h2 (str @name)]
 
        [:div
-        [:table
-         [:tr [:td "Receita"] [:td "Gasta"]]
-
-         (for [item @orcamento]
-           (if (< 0 item)
-             [:tr
-              [:td  item] [:td] ]
-             [:tr
-              [:td]
-              [:td
-               [:span {:class "negative"} item]]]))
+        [:table [:tbody
+                 [:tr [:td "Receita"] [:td "Gasta"]]
+
+                 (for [item @orcamento]
+                   (if (< 0 item)
+                     [:tr
+                      [:td  item] [:td] ]
+                     [:tr
+                      [:td]
+                      [:td
+                       [:span {:class "negative"} item]]]))]
          ]
         ]