diff options
| author | Joris | 2020-01-19 14:03:31 +0100 |
|---|---|---|
| committer | Joris | 2020-01-19 14:10:51 +0100 |
| commit | af8353c6164aaaaa836bfed181f883ac86bb76a5 (patch) | |
| tree | b23c3f87a82f0e3c2e5ed46b932c3495616cfbae /common/src/Common/Model/SignInForm.hs | |
| parent | bc48d7428607c84003658d5b88d41cf923d010fd (diff) | |
Sign in with email and password
Diffstat (limited to 'common/src/Common/Model/SignInForm.hs')
| -rw-r--r-- | common/src/Common/Model/SignInForm.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/common/src/Common/Model/SignInForm.hs b/common/src/Common/Model/SignInForm.hs index 2b8c955..7a25935 100644 --- a/common/src/Common/Model/SignInForm.hs +++ b/common/src/Common/Model/SignInForm.hs @@ -7,7 +7,8 @@ import Data.Text (Text) import GHC.Generics (Generic) data SignInForm = SignInForm - { _signIn_email :: Text + { _signInForm_email :: Text + , _signInForm_password :: Text } deriving (Show, Generic) instance FromJSON SignInForm |