aboutsummaryrefslogtreecommitdiff
path: root/common/src/Common/Model/Init.hs
diff options
context:
space:
mode:
authorJoris2017-11-13 23:56:40 +0100
committerJoris2017-11-14 00:03:10 +0100
commit5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1 (patch)
tree4884de1d03bc47ba8f06b2cf68365d9eed9e0d39 /common/src/Common/Model/Init.hs
parent213cf7ede058b781fc957de2cd9f6a5988c08004 (diff)
downloadbudget-5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1.tar.gz
budget-5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1.tar.bz2
budget-5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1.zip
Setup stylish-haskell
Diffstat (limited to 'common/src/Common/Model/Init.hs')
-rw-r--r--common/src/Common/Model/Init.hs28
1 files changed, 14 insertions, 14 deletions
diff --git a/common/src/Common/Model/Init.hs b/common/src/Common/Model/Init.hs
index 68fcfb8..ae23bb5 100644
--- a/common/src/Common/Model/Init.hs
+++ b/common/src/Common/Model/Init.hs
@@ -4,24 +4,24 @@ module Common.Model.Init
( Init(..)
) where
-import Data.Aeson (FromJSON, ToJSON)
-import GHC.Generics (Generic)
+import Data.Aeson (FromJSON, ToJSON)
+import GHC.Generics (Generic)
-import Common.Model.Category (Category)
-import Common.Model.Currency (Currency)
-import Common.Model.Income (Income)
-import Common.Model.Payment (Payment)
-import Common.Model.PaymentCategory (PaymentCategory)
-import Common.Model.User (UserId, User)
+import Common.Model.Category (Category)
+import Common.Model.Currency (Currency)
+import Common.Model.Income (Income)
+import Common.Model.Payment (Payment)
+import Common.Model.PaymentCategory (PaymentCategory)
+import Common.Model.User (User, UserId)
data Init = Init
- { _init_users :: [User]
- , _init_currentUser :: UserId
- , _init_payments :: [Payment]
- , _init_incomes :: [Income]
- , _init_categories :: [Category]
+ { _init_users :: [User]
+ , _init_currentUser :: UserId
+ , _init_payments :: [Payment]
+ , _init_incomes :: [Income]
+ , _init_categories :: [Category]
, _init_paymentCategories :: [PaymentCategory]
- , _init_currency :: Currency
+ , _init_currency :: Currency
} deriving (Show, Generic)
instance FromJSON Init