fixed warnings.

src/clj/auto_ap/datomic/accounts.clj

@@ -79,7 +79,7 @@
          (d/db conn )
          vendor-id)))
 
-(defn get-account-by-numeric-code-and-sets [numeric-code sets]
+(defn get-account-by-numeric-code-and-sets [numeric-code _]
   (let [query (cond-> {:query {:find ['(pull ?e [* {:account/type [:db/ident :db/id]}])]
                                :in ['$ '?numeric-code]
                                :where ['[?e :account/numeric-code ?numeric-code]]}
@@ -122,7 +122,7 @@
       true (apply-pagination args))))
 
 
-(defn graphql-results [ids db args]
+(defn graphql-results [ids db _]
   (let [results (->> (d/pull-many db default-read ids)
                      (group-by :db/id))
         accounts (->> ids