blob: 7a2593518353c7f566acdedd9837cc595654d3b8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
module Common.Model.SignInForm
( SignInForm(..)
) where
import Data.Aeson (FromJSON, ToJSON)
import Data.Text (Text)
import GHC.Generics (Generic)
data SignInForm = SignInForm
{ _signInForm_email :: Text
, _signInForm_password :: Text
} deriving (Show, Generic)
instance FromJSON SignInForm
instance ToJSON SignInForm
|
