Display error message properly on modal edit

2025-03-25 16:45:05 +00:00 · 2020-10-19 00:30:21 +02:00 · 2020-10-19 00:30:21 +02:00 · d66ae4fdc2
commit d66ae4fdc2
parent 3771587e55
1 changed files with 9 additions and 1 deletions
--- a/modules/webapp/src/main/elm/Comp/DetailEdit.elm
+++ b/modules/webapp/src/main/elm/Comp/DetailEdit.elm
@ -300,12 +300,20 @@ update flags msg model =
            )

        SubmitResp (Ok res) ->
+            let
+                ret =
+                    if res.success then
+                        Just (makeValue model.form)
+
+                    else
+                        Nothing
+            in
            ( { model
                | result = Just res
                , submitting = False
              }
            , Cmd.none
-            , Just (makeValue model.form)
+            , ret
            )

        SubmitResp (Err err) ->