Render edit-modals above the menu and not the whole page

This commit is contained in:
Eike Kettner
2020-08-06 23:38:55 +02:00
parent c4d48d8709
commit a8ea391715
6 changed files with 62 additions and 15 deletions

View File

@ -6,6 +6,7 @@ module Comp.OrgForm exposing
, isValid
, update
, view
, view1
)
import Api.Model.Organization exposing (Organization)
@ -109,6 +110,11 @@ update flags msg model =
view : UiSettings -> Model -> Html Msg
view settings model =
view1 settings False model
view1 : UiSettings -> Bool -> Model -> Html Msg
view1 settings compact model =
div [ class "ui form" ]
[ div
[ classList
@ -132,7 +138,7 @@ view settings model =
, h3 [ class "ui dividing header" ]
[ text "Contacts"
]
, Html.map ContactMsg (Comp.ContactField.view settings model.contactModel)
, Html.map ContactMsg (Comp.ContactField.view1 settings compact model.contactModel)
, h3 [ class "ui dividing header" ]
[ text "Notes"
]