Makes multiple client selection somewhat possible via graphql.

src/clj/auto_ap/graphql/ledger.clj

@@ -36,7 +36,7 @@
 (defn get-ledger-page [context args _]
   (let [args (assoc args :id (:id context))
         [journal-entries journal-entries-count] (l/get-graphql (assoc (<-graphql (:filters args))
-                                                                      :id (:id context)))
+                                                                      :clients (:clients context)))
 
         journal-entries (mapv
                          (fn [je]
@@ -316,7 +316,7 @@
 
 (defn delete-external-ledger [context args _]
   (let [_ (assert-admin (:id context))
-        args (assoc args :id (:id context))
+        args (assoc args :clients (:clients context))
         ids (some-> (:filters args)
                     (assoc :only-external true)
                     (<-graphql)