upRootNutrition/website
1
0
Fork 0
mirror of https://gitlab.com/upRootNutrition/website.git synced 2025-06-16 12:25:12 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat: still need to remake headers

Browse source
This commit is contained in:
Nick 2024-12-21 23:23:59 -06:00
parent 4686c14667
commit f9af0e1941
209 changed files with 1057 additions and 953 deletions
Download patch file Download diff file Expand all files Collapse all files

32
frontend/src/Pages/Services/Elm.elm
View file

@ -1,8 +1,9 @@
module Pages.Services.Elm exposing (Model, Msg, page)
import Config.Helpers.CardFormat exposing (..)
import Config.Helpers.Cardables.Helpers exposing (cardMaker)
import Config.Helpers.Cardables.Types as C
import Config.Helpers.Format exposing (..)
import Config.Helpers.Headers.Header exposing (headerMaker)
import Config.Helpers.Headers.Header exposing (..)
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -110,17 +111,24 @@ elmBuildsContainer device =
elmBuildsList : Device -> Element msg
elmBuildsList device =
column pageList <|
column
(case ( device.class, device.orientation ) of
_ ->
pageList
)
<|
List.concat
(case ( device.class, device.orientation ) of
_ ->
[ [ headerMaker device ] ]
)
headerMaker : Device -> Element msg
headerMaker device =
cardMaker device "" contentList { description = "", src = "" } ""
[ -- List.map (headerMaker device)
-- [
-- servicesHeader
-- ]
-- ,
List.map
(\service ->
cardMaker device (C.Service service) contentList
)
[]
]
contentList : List (Element msg)