Set currency in conf instead of in messages

1 files changed, 3 insertions, 0 deletions

diff --git a/src/client/Model.elm b/src/client/Model.elm
index 72db56a..c330d86 100644
--- a/src/client/Model.elm
+++ b/src/client/Model.elm
@@ -8,11 +8,13 @@ import Json.Decode as Json
 
 import Model.View exposing (..)
 import Model.Translations exposing (..)
+import Model.Conf exposing (..)
 
 type alias Model =
   { view : View
   , currentTime : Time
   , translations : Translations
+  , conf : Conf
   }
 
 initialModel : Time -> String -> Model
@@ -23,4 +25,5 @@ initialModel initialTime translationsValue =
       case Json.decodeString translationsDecoder translationsValue of
         Ok translations -> translations
         Err err -> []
+  , conf = { currency = "€" }
   }