CurryInfo: html2-3.5.0 / HTML.Styles.Bootstrap4.stdModal

 
stdModal :: HTML h => Bool -> String -> [h] -> [h] -> [h] -> h
stdModal staticbackdrop modalId title body footer =
  modal modalId labelId
    [modalDialog
      [modalContent
        [modalHeader
          [ htmlStruct "h5" [("class","modal-title")] title
              `addAttr` ("id",labelId)
          , stdModalClose]
        , modalBody body
        , modalFooter footer]]]
   `addAttrs`
     (if staticbackdrop
        then [("data-backdrop","static"), ("data-keyboard","false")]
        else [])
 where labelId = modalId ++ "Label"

 argument 1

 deterministic operation

 
Defining a modal dialog where a modal id, the title, body, and footer
HTML expressions are provided.
If the first argument is `True`, then the modal dialog
will not close when clicking outside it.

 (_, _, _, _, _, _)

 referentially transparent operation

 no fixity defined

 {(_,_,_,_,_,_) |-> _}

 stdModal

 no precedence defined

 _

 HTML.Base.HTML a => Prelude.Bool -> String -> [a] -> [a] -> [a] -> a

 operation might suspend on free variables

 yes

 reducible on all ground data terms