revamped logging!

src/clj/auto_ap/datomic/invoices.clj

@@ -156,8 +156,7 @@
     
     [(->> (graphql-results ids-to-retrieve db args))
      matching-count
-     (doto  
-         outstanding println)]))
+     outstanding]))
 
 (defn get-by-id [id]
   (-> (d/db (d/connect uri))
@@ -186,8 +185,7 @@
                                   [(not= ?e ?invoice-id)]
                                   ]}
                  
-                 :args [(d/db (d/connect uri)) invoice-number vendor client (or id 0)]}
-          true (doto println)))
+                 :args [(d/db (d/connect uri)) invoice-number vendor client (or id 0)]}))
        (map first)
        
        (map <-datomic)))

src/clj/auto_ap/datomic/transactions.clj

@@ -115,8 +115,7 @@
                                                   "status" ['[?e :transaction/status ?sort-status]]}
                                                  args)
                  true
-                 (merge-query {:query {:find ['?e] :where ['[?e :transaction/id]]}}))
-         _ (println query)]
+                 (merge-query {:query {:find ['?e] :where ['[?e :transaction/id]]}}))]
      (cond->> query
        true (d/query)
        true (apply-sort-3 args)

src/clj/auto_ap/datomic/users.clj

@@ -41,7 +41,6 @@
                  first
                  first
                  (update :user/role :db/ident))]
-    (println "USER" user)
     (if user
       user
       (let [new-user-trans @(d/transact (d/connect uri) [(cond-> new-user