Better experience for adding new journal entry
This commit is contained in:
@@ -22,6 +22,7 @@
|
||||
[auto-ap.ssr.ledger.cash-flows :as cash-flows]
|
||||
[auto-ap.ssr.ledger.common :refer [bank-account-filter default-read
|
||||
fetch-ids grid-page query-schema]]
|
||||
[auto-ap.ssr.ledger.common :as ledger.common]
|
||||
[auto-ap.ssr.ledger.investigate :as investigate]
|
||||
[auto-ap.ssr.ledger.new :as new]
|
||||
[auto-ap.ssr.ledger.profit-and-loss :as profit-and-loss]
|
||||
@@ -76,7 +77,7 @@
|
||||
;; TODO test as a real user
|
||||
|
||||
|
||||
(def row* (partial helper/row* grid-page))
|
||||
|
||||
|
||||
(defn delete [{invoice :entity :as request identity :identity}]
|
||||
(exception->notification
|
||||
@@ -103,7 +104,7 @@
|
||||
(:invoice/expense-accounts invoice))}]]
|
||||
identity)
|
||||
|
||||
(html-response (row* (:identity request) (dc/pull (dc/db conn) default-read (:db/id invoice))
|
||||
(html-response (ledger.common/row* (:identity request) (dc/pull (dc/db conn) default-read (:db/id invoice))
|
||||
{:class "live-removed"})
|
||||
:headers {"hx-retarget" (format "#entity-table tr[data-id=\"%d\"]" (:db/id invoice))}))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user