From 0297304cfc0b65cec5ceecdfb10537d7516ef669 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Wed, 2 Sep 2020 06:50:18 -0700 Subject: [PATCH] fixing ledger. --- src/clj/auto_ap/datomic/ledger.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/clj/auto_ap/datomic/ledger.clj b/src/clj/auto_ap/datomic/ledger.clj index 6c07ef96..39974646 100644 --- a/src/clj/auto_ap/datomic/ledger.clj +++ b/src/clj/auto_ap/datomic/ledger.clj @@ -101,7 +101,7 @@ :args [(:location args)]}) true - (merge-query {:query {:find ['?base-date '?e] :where ['[?e :journal-entry/date ?base-date] + (merge-query {:query {:find ['?sort-default '?e] :where ['[?e :journal-entry/date ?sort-default] '[?e :journal-entry/amount ?ja2] '[(not= 0.0 ?ja2)]]}}))] (->> query