feat: improved formatting

This commit is contained in:
Nick 2024-11-16 00:26:41 -06:00
parent 833c6b5d94
commit 68b6a45d6c
3 changed files with 28 additions and 11 deletions

View file

@ -17,6 +17,15 @@ import View exposing (View)
makeDodge : Dodge -> Int -> Element msg
makeDodge dodgeEntry index =
let
formatProposition : String -> String
formatProposition proposition =
if proposition == "N/A" then
proposition
else
"\"" ++ proposition ++ "\""
in
column paragraphAlignLeft
[ row (paragraphFormat ++ [ F.size 18 ])
[ text " "
@ -54,7 +63,7 @@ makeDodge dodgeEntry index =
[ column [ alignTop, width <| px 184 ]
[ text " Proposition:"
]
, column [ width <| px 350, alignLeft ] [ paragraph [ F.regular ] [ text dodgeEntry.dodgeProposition ] ]
, column [ width <| px 350, alignLeft ] [ paragraph [ F.regular ] [ text (formatProposition dodgeEntry.dodgeProposition) ] ]
]
, row (paragraphBoldFormat ++ [ width fill ])
[ column [ alignTop, width <| px 184 ]