betagouv / elm-dsfr / BetaGouv.DSFR.Modal

Modal

view : Config msg -> Accessibility.Html msg -> Maybe (Accessibility.Html msg) -> ( Accessibility.Html msg, Accessibility.Html msg )

Crée une modale

Modal.view
    { id = "id"
    , label = "Ouvrir la modale"
    , openMsg = Open
    , closeMsg = Just Close
    , title = text "Titre"
    , opened = True
    }
    (text "Contenu")
    Nothing

Retourne, sous forme d'un tuple, la modale et le bouton d'ouverture