fixes client bug when investigating

src/clj/user.clj

@@ -658,6 +658,7 @@
                  invoice (d/entity db invoice-id)
                  current-total (:invoice/total invoice)
                  target-total (invoice-totals invoice-id) ;; TODO should include expense accounts not visible
+                 _ (println current-total target-total)
                  new-account? (not (boolean (or (some-> invoice-expense-account-id not-empty Long/parseLong)
                                                 (:db/id (first (:invoice/expense-accounts invoice))))))
 
@@ -685,7 +686,8 @@
                                                                        [?ip :invoice-payment/amount ?a]
                                                                        [?ip :invoice-payment/payment ?p]
                                                                        ]
-                                                                     db invoice-id))]]
+                                                                     db invoice-id))]
+           :when current-total]
 
        [
         (when (not (auto-ap.utils/dollars= current-total target-total))