module SignIn.Action ( Action(..) ) where type Action = UpdateLogin String | WaitingServer | ValidLogin | ErrorLogin String