upRootNutrition/website
1
0
Fork 0
mirror of https://gitlab.com/upRootNutrition/website.git synced 2025-08-10 20:34:39 -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

30
frontend/src/Pages/Services/Analysis.elm
View file

@ -1,6 +1,7 @@
module Pages.Services.Analysis 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.Types exposing (Header)
import Config.Helpers.Response exposing (pageList, topLevelContainer)
@ -105,17 +106,24 @@ analysisContainer device =
analysisList : Device -> Element msg
analysisList 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)