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: stuff is fucked but I'm too tired to continue tonight

Browse source
This commit is contained in:
Nick 2024-12-21 04:07:50 -06:00
parent d2056e032e
commit 277ba17421
37 changed files with 683 additions and 1491 deletions
Download patch file Download diff file Expand all files Collapse all files

94
frontend/src/Pages/Debate/Cucklist.elm
View file

@ -1,21 +1,7 @@
module Pages.Debate.Cucklist exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.CardFormat
exposing
( cardContentSpacing
, cardFormatter
, cardMaker
, cardTitleMaker
, desktopCardMaker
, desktopImageBoxSize
, desktopImageSize
, fieldSpacer
, mobileCardMaker
, mobileImageBoxSize
, mobileImageSize
, topLevelBox
)
import Config.Helpers.CardFormat exposing (cardMaker)
import Config.Helpers.Converters exposing (formatSocial)
import Config.Helpers.Format
exposing
@ -143,17 +129,11 @@ cucksList device =
)
<|
List.concat
[ List.map headerMaker
[ List.map (headerMaker device)
[ cuckListHeader ]
, (case ( device.class, device.orientation ) of
( Phone, Portrait ) ->
List.map mobileCuckMaker
( Tablet, Portrait ) ->
List.map mobileCuckMaker
_ ->
List.map desktopCuckMaker
List.map (cuckMaker device)
)
cuckList
]
@ -170,56 +150,17 @@ cuckListHeader =
}
desktopCuckMaker : Cuck -> Element msg
desktopCuckMaker cuck =
row
topLevelBox
[ desktopCardMaker desktopImageBoxSize desktopImageSize (cuckImage cuck) (cuckSocial cuck)
, cardMaker
[ cardTitleMaker (cuckTitle cuck)
, cardFormatter
[ cardContentSpacing
[ column
fieldSpacer
[ socialMaker cuck
, dodgeTitle cuck
, dodgeMaker cuck
]
]
]
]
]
cuckMaker : Device -> Cuck -> Element msg
cuckMaker device cuck =
cardMaker device cuck.cuckName (contentList cuck) (cuckImage cuck) cuck.cuckSocial
mobileCuckMaker : Cuck -> Element msg
mobileCuckMaker cuck =
column
topLevelBox
[ column [] []
, cardMaker
[ cardTitleMaker (cuckTitle cuck)
, cardFormatter
[ cardContentSpacing
[ column
fieldSpacer
[ column
[ alignTop
, centerX
, alignLeft
, spacing 3
]
[ row [ spacing 10 ]
[ mobileCardMaker mobileImageBoxSize mobileImageSize (cuckImage cuck) (cuckSocial cuck)
, socialMaker cuck
]
, dodgeTitle cuck
, dodgeMaker cuck
]
]
]
]
]
]
contentList : Cuck -> List (Element msg)
contentList cuck =
[ socialMaker cuck
, dodgeTitle cuck
, dodgeMaker cuck
]
cuckImage :
@ -234,16 +175,6 @@ cuckImage cuck =
}
cuckTitle : Cuck -> String
cuckTitle cuck =
cuck.cuckName
cuckSocial : Cuck -> String
cuckSocial cuck =
cuck.cuckSocial
dodgeMaker : Cuck -> Element msg
dodgeMaker cuck =
column
@ -418,6 +349,7 @@ circumstance cuck dodge =
text "Chose to gesture vaguely instead of engaging"
, el [ F.color colourTheme.textLightGrey ] <|
text "."
-- , receipts cuck dodge
]