diff options
| author | Joris Guyonvarch | 2015-07-18 18:29:46 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-07-18 18:29:46 +0200 |
| commit | 3486644b442a0800f645ec9ae7f3ce8fe2b3c9cd (patch) | |
| tree | 07cf31c37b09a2cb8bcb04380b91a640727888df /src/client/Model.elm | |
| parent | b27a7914993f5a5a87160dc33431a6fa1f4ad323 (diff) | |
| download | budget-3486644b442a0800f645ec9ae7f3ce8fe2b3c9cd.tar.gz budget-3486644b442a0800f645ec9ae7f3ce8fe2b3c9cd.tar.bz2 budget-3486644b442a0800f645ec9ae7f3ce8fe2b3c9cd.zip | |
Showing either the payment table or a forbidden message in the UI
Diffstat (limited to 'src/client/Model.elm')
| -rw-r--r-- | src/client/Model.elm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/client/Model.elm b/src/client/Model.elm index 50d0c06..6888676 100644 --- a/src/client/Model.elm +++ b/src/client/Model.elm @@ -8,10 +8,12 @@ import List import Model.Payment exposing (Payments) type alias Model = - { payments : Payments + { payments : Maybe Payments + , forbiddenAccess : Bool } initialModel : Model initialModel = - { payments = [] + { payments = Nothing + , forbiddenAccess = False } |