aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/LoggedIn/Income/View.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/LoggedIn/Income/View.elm')
-rw-r--r--src/client/elm/LoggedIn/Income/View.elm14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/client/elm/LoggedIn/Income/View.elm b/src/client/elm/LoggedIn/Income/View.elm
index 5a2c18e..2c5bcaf 100644
--- a/src/client/elm/LoggedIn/Income/View.elm
+++ b/src/client/elm/LoggedIn/Income/View.elm
@@ -50,13 +50,13 @@ view loggedData incomeModel =
Nothing -> text ""
, div
[ class "textual monthlyNetIncomes" ]
- [ h1 [] [ text <| getMessage "MonthlyNetIncomes" loggedData.translations ]
+ [ h1 [] [ text <| getMessage loggedData.translations "MonthlyNetIncomes" ]
, AddIncome.button
"addIncome"
loggedData
(AddIncome.initialAdd loggedData.translations (Date.fromTime loggedData.currentTime))
"AddIncome"
- (text (getMessage "AddIncome" loggedData.translations))
+ (text (getMessage loggedData.translations "AddIncome"))
Nothing
]
, Table.view loggedData incomeModel
@@ -67,7 +67,7 @@ cumulativeIncomesView loggedData since =
let longDate = Date.longView (Date.fromTime since) loggedData.translations
in div
[ class "textual" ]
- [ h1 [] [ text <| getParamMessage [longDate] "CumulativeIncomesSince" loggedData.translations ]
+ [ h1 [] [ text <| getParamMessage [longDate] loggedData.translations "CumulativeIncomesSince" ]
, ul
[]
( Dict.toList loggedData.users
@@ -95,11 +95,11 @@ incomeView loggedData (incomeId, income) =
, text <| Format.price loggedData.conf income.amount
, let dialogConfig =
{ className = "deleteIncomeDialog"
- , title = getMessage "ConfirmIncomeDelete" loggedData.translations
+ , title = getMessage loggedData.translations "ConfirmIncomeDelete"
, body = always <| text ""
- , confirm = getMessage "Confirm" loggedData.translations
- , confirmMsg = always <| Msg.Dialog <| Dialog.UpdateAndClose <| Msg.UpdateLoggedIn <| LoggedInMsg.DeleteIncome incomeId
- , undo = getMessage "Undo" loggedData.translations
+ , confirm = getMessage loggedData.translations "Confirm"
+ , confirmMsg = always <| Msg.Dialog <| Dialog.UpdateAndClose <| Msg.DeleteIncome incomeId
+ , undo = getMessage loggedData.translations "Undo"
}
in button
[ onClick (Msg.Dialog <| Dialog.Open dialogConfig) ]