diff options
Diffstat (limited to 'src/Page.purs')
-rw-r--r-- | src/Page.purs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Page.purs b/src/Page.purs index 850875a..f7c04c2 100644 --- a/src/Page.purs +++ b/src/Page.purs @@ -71,7 +71,7 @@ renderHeader search = [ HH.text "Index glycémique" ] , HH.div [] - [ HH.text "Glucides pour 100g" ] + [ HH.text "Glucides pour 100 g" ] , HH.div [] [ HH.text "Charge glycémique" ] @@ -96,7 +96,7 @@ renderAliment aliment = [ HH.text (show aliment.glycemicIndex) ] , HH.div [ HP.class_ $ HH.ClassName "number" ] - [ HH.text (show aliment.carbohydrates) ] + [ HH.text (show aliment.carbohydrates <> " g") ] , let glycemicLoad = Food.glycemicLoad aliment in HH.div [ HP.class_ $ HH.ClassName ("number " <> (Indicator.className $ Indicator.fromGlycemicLoad glycemicLoad)) ] |