From 35493d8ec353f90a6ca67e2aedb702684e0abafa Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 2 Jan 2016 20:49:24 +0100 Subject: Moving initViewAction to serverCommunication module --- src/client/elm/View/Icon.elm | 6 +++--- src/client/elm/View/SignIn.elm | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) (limited to 'src/client/elm/View') diff --git a/src/client/elm/View/Icon.elm b/src/client/elm/View/Icon.elm index 9fa5f8a..bdbe6d5 100644 --- a/src/client/elm/View/Icon.elm +++ b/src/client/elm/View/Icon.elm @@ -12,8 +12,8 @@ renderIcon iconClass = [ class <| "fa fa-fw fa-" ++ iconClass ] [] -renderSpinIcon : String -> Html -renderSpinIcon iconClass = +renderSpinIcon : Html +renderSpinIcon = i - [ class <| "fa fa-fw fa-spin fa-" ++ iconClass ] + [ class <| "fa fa-fw fa-pulse fa-spinner" ] [] diff --git a/src/client/elm/View/SignIn.elm b/src/client/elm/View/SignIn.elm index f662a97..ba16561 100644 --- a/src/client/elm/View/SignIn.elm +++ b/src/client/elm/View/SignIn.elm @@ -28,7 +28,7 @@ renderSignIn address model signInView = [ onClick operations.address Persona.SignIn ] [ span [] [ text (getMessage "SignIn" model.translations) ] , if signInView.connecting - then renderSpinIcon "refresh" + then renderSpinIcon else renderIcon "power-off" ] , signInResult model signInView -- cgit v1.2.3