diff options
| author | Joris | 2017-11-13 23:56:40 +0100 | 
|---|---|---|
| committer | Joris | 2017-11-14 00:03:10 +0100 | 
| commit | 5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1 (patch) | |
| tree | 4884de1d03bc47ba8f06b2cf68365d9eed9e0d39 /common/src/Common/Model/Init.hs | |
| parent | 213cf7ede058b781fc957de2cd9f6a5988c08004 (diff) | |
Setup stylish-haskell
Diffstat (limited to 'common/src/Common/Model/Init.hs')
| -rw-r--r-- | common/src/Common/Model/Init.hs | 28 | 
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  | 
