diff options
Diffstat (limited to 'src/client/elm/LoggedIn/Home/AddPayment')
| -rw-r--r-- | src/client/elm/LoggedIn/Home/AddPayment/View.elm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/client/elm/LoggedIn/Home/AddPayment/View.elm b/src/client/elm/LoggedIn/Home/AddPayment/View.elm index d97f3ca..b13097b 100644 --- a/src/client/elm/LoggedIn/Home/AddPayment/View.elm +++ b/src/client/elm/LoggedIn/Home/AddPayment/View.elm @@ -4,6 +4,9 @@ module LoggedIn.Home.AddPayment.View exposing import Result exposing (..) import Json.Decode as Json +import Color + +import FontAwesome import Html exposing (..) import Html.Attributes exposing (..) @@ -24,7 +27,6 @@ import Model.Translations exposing (getMessage) import LoggedData exposing (LoggedData) import View.Events exposing (onSubmitPrevDefault) -import View.Icon exposing (..) import Utils.Maybe exposing (isJust) import Utils.Either exposing (toMaybeError) @@ -52,7 +54,9 @@ view loggedData homeModel = ] ] [ text (getMessage "Add" loggedData.translations) - , if homeModel.add.waitingServer then renderSpinIcon else text "" + , if homeModel.add.waitingServer + then FontAwesome.spinner Color.white 20 + else text "" ] ] @@ -73,7 +77,7 @@ addPaymentName loggedData addPayment = [] , label [ for "nameInput" ] - [ renderIcon "shopping-cart" ] + [ FontAwesome.shopping_cart Color.white 20 ] , case addPayment.nameError of Just error -> div [ class "errorMessage" ] [ text error ] |