everything except pagination

src/clj/auto_ap/datomic.clj

@@ -1,16 +1,7 @@
 (ns auto-ap.datomic
-  (:require [datomic.api :as d]
-            [auto-ap.db.vendors :as v]
-            [auto-ap.db.companies :as c]
-            [auto-ap.db.invoices :as i]
-            [auto-ap.db.checks :as checks]
-            [auto-ap.db.users :as users]
-            [auto-ap.db.invoices-expense-accounts :as iea]
-            [auto-ap.db.invoices-checks :as ic]
-            [auto-ap.db.transactions :as transactions]
-            [clojure.string :as str]
-            [clj-time.core :as time]
+  (:require [auto-ap.utils :refer [default-pagination-size]]
             [clj-time.coerce :as coerce]
+            [datomic.api :as d]
             [mount.core :as mount]))
 
 (def uri "datomic:sql://invoices?jdbc:postgresql://database:5432/datomic?user=datomic&password=datomic")
@@ -815,6 +806,6 @@
 
   {:ids  (->> results
               (drop (:start args 0))
-              (take (:count args 100))
+              (take (:count args default-pagination-size))
               (map last))
    :count (count results)})