aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/View/LoggedIn/AddPayment.elm
diff options
context:
space:
mode:
authorJoris2016-01-03 19:41:31 +0100
committerJoris2016-01-03 19:41:31 +0100
commita8309988518af5bddf62d6a326d990fde4069b40 (patch)
tree6ff9c0af27d78f8579b5c3975378a3c82899593c /src/client/elm/View/LoggedIn/AddPayment.elm
parent0cba27cba2b44756389d50bc113f23a2be87e978 (diff)
downloadbudget-a8309988518af5bddf62d6a326d990fde4069b40.tar.gz
budget-a8309988518af5bddf62d6a326d990fde4069b40.tar.bz2
budget-a8309988518af5bddf62d6a326d990fde4069b40.zip
Set focus properties to button elements
Diffstat (limited to 'src/client/elm/View/LoggedIn/AddPayment.elm')
-rw-r--r--src/client/elm/View/LoggedIn/AddPayment.elm5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/client/elm/View/LoggedIn/AddPayment.elm b/src/client/elm/View/LoggedIn/AddPayment.elm
index 283d392..0b39591 100644
--- a/src/client/elm/View/LoggedIn/AddPayment.elm
+++ b/src/client/elm/View/LoggedIn/AddPayment.elm
@@ -13,10 +13,9 @@ import Html.Events exposing (..)
import Model exposing (Model)
import Model.Payment exposing (PaymentFrequency(..))
import Model.Translations exposing (getMessage)
-import Model.Action exposing (..)
+import Model.Action as Action exposing (..)
import Model.Action.LoggedInAction as LoggedInAction exposing (..)
import Model.Action.AddPaymentAction exposing (..)
-import Model.Communication as Communication
import Model.View.LoggedIn.AddPayment exposing (..)
import Model.View.LoggedInView exposing (LoggedInView)
@@ -32,7 +31,7 @@ addPayment address model loggedInView =
H.form
[ let update =
if loggedInView.add.waitingServer
- then NoOp
+ then Action.NoOp
else
case (validateName loggedInView.add.name model.translations, validateCost loggedInView.add.cost model.translations) of
(Ok name, Ok cost) ->