Merge branch 'master' of codecommit://integreat into try-tailwind

2023-05-30 11:23:38 -07:00
parent d273f3f327 c020fa2818
commit b5e78da9d0
3 changed files with 14 additions and 9 deletions
--- a/src/clj/auto_ap/datomic/invoices.clj
+++ b/src/clj/auto_ap/datomic/invoices.clj
@@ -297,8 +297,10 @@
  (mu/log ::trying-to-code-invoice
          :invoice invoice)
  (let [db (dc/db auto-ap.datomic/conn)
-        client-id (:invoice/client invoice)
-        vendor-id (:invoice/vendor invoice)
+        client-id (or (:db/id (:invoice/client invoice))
+                      (:invoice/client invoice))
+        vendor-id (or (:db/id (:invoice/vendor invoice))
+                      (:invoice/vendor invoice))
        date (:invoice/date invoice)
        vendor (dc/pull db '[*] vendor-id)
        due (when (:vendor/terms vendor)