Adds new ledger import page
This commit is contained in:
@@ -309,7 +309,17 @@
|
||||
{:subject :ledger
|
||||
:activity :import})
|
||||
(menu-button- {:href (bidi/path-for client-routes/routes
|
||||
:external-import-ledger)} "External Ledger Import")))))]))
|
||||
:external-import-ledger)} "External Ledger Import"))
|
||||
|
||||
(when (is-admin? (:identity request))
|
||||
(menu-button- {:href (hu/url (bidi/path-for ssr-routes/only-routes
|
||||
::ledger-routes/external-import-page)
|
||||
{:date-range "month"})
|
||||
:active? (= ::ledger-routes/external-import-page (:matched-route request))
|
||||
:hx-boost "true"}
|
||||
[:div.flex.gap-2
|
||||
"External Import"
|
||||
(tags/pill- {:color :secondary} "WIP")])))))]))
|
||||
|
||||
|
||||
(defn company-aside-nav- [request]
|
||||
|
||||
@@ -68,13 +68,14 @@
|
||||
per-page
|
||||
flash-id
|
||||
headers
|
||||
rows] :as params}]
|
||||
[:div {:hx-get (bidi/path-for ssr-routes/only-routes
|
||||
route
|
||||
:request-method :get)
|
||||
:hx-trigger "clientSelected from:body, invalidated from:body"
|
||||
:hx-swap "outerHTML swap:300ms"
|
||||
:id id}
|
||||
rows] :as params} & children]
|
||||
[:div (cond-> { :id id}
|
||||
route (assoc
|
||||
:hx-get (bidi/path-for ssr-routes/only-routes
|
||||
route
|
||||
:request-method :get)
|
||||
:hx-trigger "clientSelected from:body, invalidated from:body"
|
||||
:hx-swap "outerHTML swap:300ms"))
|
||||
|
||||
(content-card-
|
||||
{}
|
||||
@@ -121,6 +122,7 @@
|
||||
:hx-target (str "#" id) ;
|
||||
:hx-swap "outerHTML show:#app:top"
|
||||
:hx-indicator (str "#" id)}}))
|
||||
children
|
||||
[:div {:class "htmx-indicator absolute -translate-x-1/2 -translate-y-1/2 top-2/4 left-1/2 overflow-hidden w-full h-full"}
|
||||
[:div {:class "flex items-center justify-center w-full h-full border border-gray-200 rounded-lg bg-gray-50 dark:bg-gray-800 dark:border-gray-700 bg-opacity-50" }
|
||||
[:div {:class "px-3 py-1 text-xs font-medium leading-none text-center text-blue-800 bg-blue-200 rounded-full animate-pulse dark:bg-blue-900 dark:text-blue-200"} "loading..."]]])])
|
||||
|
||||
@@ -148,6 +148,14 @@
|
||||
(hh/add-class %)))
|
||||
(update :class #(str % (use-size size))))])
|
||||
|
||||
(defn text-area- [{:keys [] :as params}]
|
||||
[:textarea
|
||||
(-> params
|
||||
(update :class #(-> ""
|
||||
(hh/add-class default-input-classes)
|
||||
(hh/add-class %)))) ]
|
||||
)
|
||||
|
||||
(defn money-input- [{:keys [size] :as params}]
|
||||
[:input
|
||||
(-> params
|
||||
|
||||
Reference in New Issue
Block a user