mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 04:25:11 -05:00
feat: very close to v1
This commit is contained in:
parent
a9fb4fb14b
commit
cf580a71d0
38 changed files with 428 additions and 246 deletions
|
@ -5,7 +5,8 @@ import Config.Helpers.Cards.Helpers exposing (cardMaker)
|
|||
import Config.Helpers.Cards.Types as C
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Headers.Helpers exposing (..)
|
||||
import Config.Helpers.Headers.Types exposing (Header)
|
||||
import Config.Helpers.Headers.Records exposing (contactHeader, nutriDexHeader)
|
||||
import Config.Helpers.Headers.Types as R exposing (..)
|
||||
import Config.Helpers.Response
|
||||
exposing
|
||||
( pageList
|
||||
|
@ -120,15 +121,24 @@ contactList device =
|
|||
column
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
pageList
|
||||
pageList device
|
||||
)
|
||||
<|
|
||||
List.concat
|
||||
[ List.map
|
||||
[ case ( device.class, device.orientation ) of
|
||||
( Phone, Portrait ) ->
|
||||
[ headerMaker (R.Contact contactHeader) ]
|
||||
|
||||
( Tablet, Portrait ) ->
|
||||
[ headerMaker (R.Contact contactHeader) ]
|
||||
|
||||
_ ->
|
||||
[ none ]
|
||||
, List.map
|
||||
(\contact ->
|
||||
cardMaker device (C.Contact contact) (contentList contact)
|
||||
)
|
||||
[contactTitle]
|
||||
[ contactTitle ]
|
||||
]
|
||||
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue