feat: refactoring and tidying up

This commit is contained in:
Nick 2024-12-18 20:11:04 -06:00
parent 62be86f2f9
commit 2295c85fca
112 changed files with 862 additions and 1698 deletions

View file

@ -19,10 +19,12 @@ import Config.Helpers.CardFormat
)
import Config.Helpers.Format
exposing
( paragraphFontSize
( headerFontSizeSmall
, paragraphFontSize
, paragraphSpacing
)
import Config.Helpers.Header exposing (..)
import Config.Helpers.Headers.Header exposing (headerMaker)
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
( pageList
@ -221,7 +223,7 @@ serviceWidth =
rateMaker : Service msg -> Element msg
rateMaker service =
row
([ F.color colourTheme.textLightGrey
([ F.color colourTheme.textLightOrange
, paragraphSpacing
, paragraphFontSize
, F.bold
@ -240,10 +242,13 @@ rateMaker service =
[ E.width fill
, alignLeft
]
[ paragraph [ F.regular ]
[ el [ F.color colourTheme.textLightOrange ] <|
E.text service.serviceRate
[ el
[ F.regular
, paragraphFontSize
, F.color colourTheme.textLightGrey
]
<|
E.text service.serviceRate
]
]
@ -251,9 +256,9 @@ rateMaker service =
descriptionMaker : Service msg -> Element msg
descriptionMaker service =
row
[ F.color colourTheme.textLightGrey
[ F.color colourTheme.textLightOrange
, paragraphSpacing
, paragraphFontSize
, headerFontSizeSmall
, F.bold
]
[ column