Vendor autopay re-instated.

src/clj/auto_ap/datomic/vendors.clj

@@ -98,3 +98,13 @@
     first
     :vendor-account-override/account)
    (:vendor/default-account vendor)))
+
+(defn automatically-paid-for-client-id? [vendor client-id]
+  (->> 
+   (:vendor/automatically-paid-when-due vendor)
+   (filter
+    (fn [client]
+      (= (:db/id client)
+         client-id)))
+   first
+   boolean))