notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

Hovering fix

Browse Source
This commit is contained in:
Bryce Covert
2019-09-12 20:47:16 -07:00
parent 051280970f
commit dbe4c7b9c4
6 changed files with 57 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/clj/auto_ap/datomic/ledger.clj
View File

@@ -3,7 +3,8 @@
[auto-ap.graphql.utils :refer [->graphql limited-clients]]
[auto-ap.datomic :refer [merge-query apply-sort-2 apply-sort apply-pagination add-sorter-field]]
[auto-ap.datomic :refer [uri]]
[clj-time.coerce :as c]))
[clj-time.coerce :as c]
[clj-time.core :as time]))
(defn sort-fn [sort-by]
(cond
@@ -50,7 +51,7 @@
(merge-query {:query {:in ['?from-date]
:where ['[?e :journal-entry/date ?d]
'[(>= ?d ?from-date)]]}
:args [(c/to-date (:from-date args))]})
:args [(c/to-date (time/minus (:from-date args) (time/days 1)))]})
(:from-numeric-code args)
(merge-query {:query {:in ['?from-numeric-code]