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

Looks good

Browse Source
This commit is contained in:
Bryce
2024-10-15 21:43:03 -07:00
parent 4e215c98ae
commit 70e76347e3
3 changed files with 42 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
iol_ion/src/iol_ion/query.clj
View File

@@ -2,8 +2,7 @@
(:require [clj-time.core :as time]
[clj-time.coerce :as coerce]
[clj-time.format :as f]
[datomic.api :as dc]
[auto-ap.time :as atime]))
[datomic.api :as dc]))
;; TODO WILL NOT WORK IN DATOMIC CLOUD
(defn entid [db i]

2
src/clj/auto_ap/ssr/components/card.clj
View File

@@ -14,5 +14,5 @@
[:section (merge params {:class (hh/add-class " py-3 sm:py-5" (:class params))})
[:div {:class (:max-w params "max-w-screen-2xl")}
(into
[:div {:class "relative overflow-hidden shadow-md dark:bg-gray-800 sm:rounded-lg border-2 border-gray-200 dark:border-gray-900 bg-white"}]
[:div {:class "relative overflow-scroll shadow-md dark:bg-gray-800 sm:rounded-lg border-2 border-gray-200 dark:border-gray-900 bg-white"}]
children)]])

7
src/clj/auto_ap/ssr/ledger/balance_sheet.clj
View File

@@ -150,8 +150,8 @@
(defn table [{:keys [table widths investigate-url warning]}]
(let [cell-count (cell-count table)]
(com/content-card {:class "inline-block overflow-hidden"}
[:div { :class "overflow-y-auto h-[70vh] m-4 inline-block"}
(com/content-card {:class "inline-block overflow-scroll"}
[:div {:class "overflow-scroll h-[70vh] m-4 inline-block"}
(when warning [:div.rounded.bg-red-50.text-red-800.p-4.m-2
warning])
(-> [:table {:class "text-sm text-left text-gray-500 dark:text-gray-400"}
@@ -190,8 +190,7 @@
(cell {:investigate-url investigate-url} c))]))
(conj [:tr (for [i (range cell-count)]
( cell {:investigate-url investigate-url} {:value " "}))])))
)])))
(cell {:investigate-url investigate-url} {:value " "}))]))))])))
(defn concat-tables [tables]
(let [[first & rest] tables]