website/frontend/src/Config/Pages/Headers/Helpers.elm
2024-12-11 03:48:49 -06:00

42 lines
1.1 KiB
Elm
Executable file

module Config.Pages.Headers.Helpers exposing (..)
import Config.Helpers.CardFormat exposing (..)
import Config.Helpers.Format
exposing
( paragraphFontSize
, paragraphSpacing
)
import Config.Helpers.StrengthBar
exposing
( barMaker
, barPadding
)
import Config.Helpers.ToolTip exposing (tooltip)
import Config.Pages.Headers.Types exposing (..)
import Config.Pages.Interviews.Types exposing (..)
import Config.Style.Colour exposing (colourTheme)
import Config.Style.Glow exposing (glowDeepDarkGrey)
import Element as E exposing (..)
import Element.Background as B
import Element.Border as D
import Element.Font as F
import Html.Attributes as H
headerMaker : Header -> Element msg
headerMaker header =
row
topLevelBox
[ cardMaker
[ cardTitleMaker header.headerTitle
, cardFormatter
[ cardContentSpacing
[ column
fieldSpacer
[ cardSubTitleMaker
[ text header.headerBody ]
]
]
]
]
]