aboutsummaryrefslogtreecommitdiff
path: root/src/client/Model/View/SignInView.elm
blob: 0fbce393b0945ca6c387c34f444807ec591e3a98 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
module Model.View.SignInView
  ( SignInView
  , initSignInView
  ) where

type alias SignInView =
  { login : String
  , result : Maybe (Result String String)
  }

initSignInView : SignInView
initSignInView =
  { login = ""
  , result = Nothing
  }