website/frontend/src/Config/Helpers/Response.elm

41 lines
755 B
Elm
Raw Normal View History

2024-12-11 03:48:49 -06:00
module Config.Helpers.Response exposing (..)
2024-12-09 19:53:09 -06:00
import Config.Style.Colour exposing (colourTheme)
import Element as E exposing (..)
2024-12-16 00:12:23 -06:00
import Element.Background as B exposing (color)
import Html.Attributes exposing (style)
2024-12-09 19:53:09 -06:00
topLevelContainer : Element msg -> Element msg
topLevelContainer =
el
[ width fill
, height fill
2024-12-16 00:12:23 -06:00
, B.color colourTheme.backgroundLightGrey
2024-12-09 19:53:09 -06:00
]
2024-12-16 00:12:23 -06:00
pageListCenter : List (Attribute msg)
pageListCenter =
[ centerY
2024-12-09 20:30:04 -06:00
]
++ pageListFormat
2024-12-16 00:12:23 -06:00
pageList : List (Attribute msg)
pageList =
[ alignTop
2024-12-09 20:30:04 -06:00
]
++ pageListFormat
pageListFormat : List (Attribute msg)
pageListFormat =
2024-12-09 19:53:09 -06:00
[ spacing 30
, centerX
2024-12-16 00:12:23 -06:00
, padding 30
, width fill
, height fill
2024-12-09 19:53:09 -06:00
, scrollbarY
]