Adding the payment without reloading the page

1 files changed, 6 insertions, 2 deletions

diff --git a/src/client/Model.elm b/src/client/Model.elm
index 8005429..45fdf87 100644
--- a/src/client/Model.elm
+++ b/src/client/Model.elm
@@ -3,13 +3,17 @@ module Model
   , initialModel
   ) where
 
+import Time exposing (Time)
+
 import Model.View exposing (..)
 
 type alias Model =
   { view : View
+  , currentTime : Time
   }
 
-initialModel : Model
-initialModel =
+initialModel : Time -> Model
+initialModel initialTime =
   { view = LoadingView
+  , currentTime = initialTime
   }