A bunch of bug fixes.

src/cljs/auto_ap/views/components/modal.cljs

@@ -54,3 +54,16 @@
              [:div.notification.is-info warning]]]
            (into (r/children (r/current-component)))
            (into [(when saving? [:div.is-overlay {:style {"backgroundColor" "rgba(150,150,150, 0.5)"}}])]))])))
+
+
+(defn simple-modal [{:keys [title foot class warning action-text id save-event can-submit? status-from] :or {can-submit? true}} & rest]
+  (let [{:keys [visible? saving? error-message]} @(re-frame/subscribe [::subs/modal-state id status-from])]
+    (when visible?
+      (-> [modal {:title [:span title]
+                  :class class
+                  :foot foot
+                  :id id
+                  :hide-event [::events/modal-status id {:visible? false :error-message nil}]}]
+          (into (r/children (r/current-component)))
+          (into [(when saving? [:div.is-overlay {:style {"backgroundColor" "rgba(150,150,150, 0.5)"}}])])))))
+