From 9997d60de1b26ee5b0fdb3ffa8f3957132e9d2e4 Mon Sep 17 00:00:00 2001 From: Bryce Date: Wed, 27 May 2026 23:07:52 -0700 Subject: [PATCH] fix: handle absent :transaction/accounts in simple-mode-fields* (ValCursor crash) --- src/clj/auto_ap/ssr/transaction/edit.clj | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/clj/auto_ap/ssr/transaction/edit.clj b/src/clj/auto_ap/ssr/transaction/edit.clj index 2bbaa60c..c5d75920 100644 --- a/src/clj/auto_ap/ssr/transaction/edit.clj +++ b/src/clj/auto_ap/ssr/transaction/edit.clj @@ -1,5 +1,6 @@ (ns auto-ap.ssr.transaction.edit (:require + [auto-ap.cursor :as cursor] [auto-ap.datomic :refer [audit-transact conn pull-attr pull-ref]] [auto-ap.datomic.accounts :as d-accounts] @@ -198,7 +199,10 @@ 0.0))] [:div (fc/with-field :transaction/accounts - (fc/with-cursor (nth fc/*current* 0 nil) + (fc/with-cursor (let [cur fc/*current*] + (if (sequential? @cur) + (nth cur 0 nil) + (auto_ap.cursor.MapCursor. {} (cursor/state cur) (conj (cursor/path cur) 0)))) [:span (fc/with-field :db/id (com/hidden {:name (fc/field-name)