added suggestions

2022-07-26 07:01:18 -07:00
parent 96c80853ef
commit 84f7e734f0
65 changed files with 130 additions and 1140 deletions
--- a/src/clj/auto_ap/ledger.clj
+++ b/src/clj/auto_ap/ledger.clj
@@ -25,19 +25,6 @@
          #_#_(namespaces "expected-deposit" )   [[:expected-deposit e]]
          :else nil)))

-
-
-(defn infer-entity [_ [_ changes]]
-  (let [namespaces (->> changes
-                        (map :a)
-                        (map namespace)
-                        set)]
-    (cond (namespaces "invoice" )   :invoice
-          (namespaces "invoice-expense-account" )   :invoice-expense-account
-          (namespaces "transaction-account" )   :transaction-account
-          #_#_(namespaces "expected-deposit" )   :expected-deposit
-          :else nil)))
-
 (defmulti entity-change->ledger (fn [_ [type]]
                                  type))