aboutsummaryrefslogtreecommitdiff
path: root/src/client/Model.elm
diff options
context:
space:
mode:
authorJoris2015-11-01 10:49:08 +0100
committerJoris2015-11-01 10:49:08 +0100
commita14af8d8f2cc9d561a8c8804a4c73b9a35ce8a97 (patch)
treef260b8a663449d30bae32b0f1cfd70bad323d8c6 /src/client/Model.elm
parentb886ef9b847b63528a40c41b333937007b8f57c5 (diff)
downloadbudget-a14af8d8f2cc9d561a8c8804a4c73b9a35ce8a97.tar.gz
budget-a14af8d8f2cc9d561a8c8804a4c73b9a35ce8a97.tar.bz2
budget-a14af8d8f2cc9d561a8c8804a4c73b9a35ce8a97.zip
Set currency in conf instead of in messages
Diffstat (limited to 'src/client/Model.elm')
-rw-r--r--src/client/Model.elm3
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 = "€" }
}