diff options
author | Joris | 2016-01-02 19:07:19 +0100 |
---|---|---|
committer | Joris | 2016-01-02 19:07:19 +0100 |
commit | bb316286b0859b5648c61f44c88399f4c1aad9cd (patch) | |
tree | ecbe401c1ff657987b6609997a69775969a317f7 /src/client/elm/View/SignIn.elm | |
parent | 0d0c99fd28b782c7daf02fb5cc48d3eb252e705d (diff) |
Use start-app for elm
Diffstat (limited to 'src/client/elm/View/SignIn.elm')
-rw-r--r-- | src/client/elm/View/SignIn.elm | 21 |
1 files changed, 9 insertions, 12 deletions
diff --git a/src/client/elm/View/SignIn.elm b/src/client/elm/View/SignIn.elm index d35d655..6d253e7 100644 --- a/src/client/elm/View/SignIn.elm +++ b/src/client/elm/View/SignIn.elm @@ -2,29 +2,26 @@ module View.SignIn ( renderSignIn ) where +import Json.Decode as Json +import Signal exposing (Address) + import Html as H exposing (..) import Html.Attributes exposing (..) import Html.Events exposing (..) -import Json.Decode as Json - -import Update exposing (..) -import Update.SignIn exposing (..) - -import ServerCommunication as SC -import ServerCommunication exposing (serverCommunications) - -import Persona exposing (operations) - import Model exposing (Model) +import Model.Action exposing (..) +import Model.Action.SignInAction exposing (..) import Model.View.SignInView exposing (..) import Model.Translations exposing (getMessage) import View.Events exposing (onSubmitPrevDefault) import View.Icon exposing (renderIcon) -renderSignIn : Model -> SignInView -> Html -renderSignIn model signInView = +import Persona exposing (operations) + +renderSignIn : Address Action -> Model -> SignInView -> Html +renderSignIn address model signInView = div [ class "signIn" ] [ button |