diff options
| author | Joris | 2017-04-09 18:53:08 +0200 |
|---|---|---|
| committer | Joris | 2017-04-09 18:53:08 +0200 |
| commit | 92a6e02b7c4027da9c6c999e6d49d170c340f082 (patch) | |
| tree | 4d7c1da084a89137b27c8aadbc887c23ef4542ef | |
| parent | 7c209f271ffc3122ada0331094e01dc6e409c2fb (diff) | |
| download | glycemie-92a6e02b7c4027da9c6c999e6d49d170c340f082.tar.gz glycemie-92a6e02b7c4027da9c6c999e6d49d170c340f082.tar.bz2 glycemie-92a6e02b7c4027da9c6c999e6d49d170c340f082.zip | |
Add unit for carbohydrates
| -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)) ] |