2024-11-10 22:55:49 -06:00
|
|
|
module Pages.Home_ exposing (page)
|
|
|
|
|
|
|
|
import Config.Identity as ID exposing (..)
|
|
|
|
import Config.Theme as T exposing (..)
|
|
|
|
import Element exposing (..)
|
|
|
|
import Element.Background as B
|
|
|
|
import Element.Font as F
|
|
|
|
import Element.Region exposing (description)
|
|
|
|
import View exposing (View)
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
-- Use this if you fuck something up
|
|
|
|
-- Element.explain Debug.todo
|
|
|
|
|
|
|
|
|
|
|
|
page : View msg
|
|
|
|
page =
|
2024-11-11 00:43:03 -06:00
|
|
|
{ title = homeName
|
2024-11-10 22:55:49 -06:00
|
|
|
, attributes = [ F.family [ spartanFont ] ]
|
|
|
|
, element = topLevelContainer
|
|
|
|
}
|
|
|
|
|
|
|
|
topLevelContainer : Element msg
|
|
|
|
topLevelContainer =
|
|
|
|
el
|
|
|
|
[ width fill
|
|
|
|
, height fill
|
|
|
|
, B.color colourTheme.backgroundColour
|
|
|
|
]
|
|
|
|
linkList
|
|
|
|
|
|
|
|
|
|
|
|
linkList : Element msg
|
|
|
|
linkList =
|
|
|
|
column
|
|
|
|
[ spacing 20
|
|
|
|
, centerX
|
|
|
|
, centerY
|
|
|
|
, F.color (rgb255 67 67 67)
|
|
|
|
]
|
|
|
|
links
|
|
|
|
|
|
|
|
paragraphFontSize : Attr decorative msg
|
|
|
|
paragraphFontSize =
|
|
|
|
F.size 17
|
|
|
|
|
|
|
|
links : List (Element msg)
|
2024-11-11 00:43:03 -06:00
|
|
|
links = []
|