website/frontend/src/Config/Helpers/Response.elm
2024-12-15 02:41:38 -06:00

38 lines
721 B
Elm
Executable file

module Config.Helpers.Response exposing (..)
import Config.Style.Colour exposing (colourTheme)
import Element as E exposing (..)
topLevelContainer : Element msg -> Element msg
topLevelContainer =
el
[ width fill
, height fill
, scrollbarY
]
pageList : List (Attribute msg)
pageList =
[ alignTop
]
++ pageListFormat
pageListCenter : List (Attribute msg)
pageListCenter =
[ centerY
]
++ pageListFormat
pageListFormat : List (Attribute msg)
pageListFormat =
[ spacing 30
, centerX
, paddingEach { top = 30, bottom = 30, left = 30, right = 30 }
, width (fill |> minimum 100)
, width (fill |> maximum 875)
, scrollbarY
]