{-|
Module: IHP.Modal.Types
Copyright: (c) digitally induced GmbH, 2020
-}
module IHP.Modal.Types
( Modal (..)
, ModalContainer (..)
) where

import IHP.Prelude
import Text.Blaze.Html5 (Html)

data Modal = Modal
    { Modal -> Html
modalContent :: Html
    , Modal -> Maybe Html
modalFooter :: Maybe Html
    , Modal -> Text
modalCloseUrl :: Text
    , Modal -> Text
modalTitle :: Text
    }

-- | Stores the current modal inside @?context@
newtype ModalContainer = ModalContainer Html