From 92a6e02b7c4027da9c6c999e6d49d170c340f082 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 9 Apr 2017 18:53:08 +0200
Subject: Add unit for carbohydrates

---
 src/Page.purs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Page.purs')

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)) ]
-- 
cgit v1.2.3