diff options
Diffstat (limited to 'common/src/Common/Model/Init.hs')
-rw-r--r-- | common/src/Common/Model/Init.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/common/src/Common/Model/Init.hs b/common/src/Common/Model/Init.hs new file mode 100644 index 0000000..5ef1535 --- /dev/null +++ b/common/src/Common/Model/Init.hs @@ -0,0 +1,18 @@ +module Common.Model.Init + ( Init(..) + ) where + +import Data.Aeson (FromJSON, ToJSON) +import GHC.Generics (Generic) + +import Common.Model.Currency (Currency) +import Common.Model.User (User, UserId) + +data Init = Init + { _init_users :: [User] + , _init_currentUser :: UserId + , _init_currency :: Currency + } deriving (Show, Generic) + +instance FromJSON Init +instance ToJSON Init |