mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 04:25:11 -05:00
feat: refactored some stuff
This commit is contained in:
parent
a7000d6302
commit
d0617b7a90
41 changed files with 161 additions and 223 deletions
41
frontend/src/Config/Helpers/Response.elm
Executable file
41
frontend/src/Config/Helpers/Response.elm
Executable file
|
@ -0,0 +1,41 @@
|
|||
module Config.Helpers.Response exposing (..)
|
||||
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
|
||||
|
||||
topLevelContainer : Element msg -> Element msg
|
||||
topLevelContainer =
|
||||
el
|
||||
[ width fill
|
||||
, height fill
|
||||
, B.color colourTheme.backgroundLightGrey
|
||||
, 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
|
||||
]
|
Loading…
Add table
Add a link
Reference in a new issue