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

Fixes bug with client page

Browse Source
This commit is contained in:
Bryce
2024-04-01 19:46:37 -07:00
parent 3957286624
commit 72a17486cd
4 changed files with 58 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/ssr/admin/clients.clj
View File

@@ -223,7 +223,9 @@
:render (fn [{:client/keys [locked-until bank-accounts]}]
[:div.flex.gap-2.flex-wrap
(if locked-until
(let [days-since-locked (time/in-days (time/interval locked-until (time/now)))]
(let [days-since-locked (try (time/in-days (time/interval locked-until (time/now)))
(catch Exception _
0))]
(cond
(< days-since-locked 90)
(com/pill {:color :primary} (format "Locked %s" (atime/unparse-local locked-until atime/normal-date)))