Makes testing of transaction rules work

2023-10-26 21:23:52 -07:00
parent 5ed23f26be
commit 7f7458d54a
12 changed files with 196 additions and 40 deletions
--- a/src/clj/auto_ap/ssr/components/buttons.clj
+++ b/src/clj/auto_ap/ssr/components/buttons.clj
@@ -176,7 +176,7 @@


 (defn validated-save-button- [{:keys [errors class] :as params} & children]
-  (button- (-> {:color :primary 
+  (button- (-> {:color (or (:color params) :primary) 
                :type  "submit" :class (cond-> (or class "")
                                         true (hh/add-class "w-32")
                                         (seq errors) (hh/add-class "animate-shake"))}
@@ -184,5 +184,4 @@
               (dissoc :errors))
           (if (seq children)
             children
-             "Save"))
-  )
+             "Save")))