diff options
author | Joris | 2016-08-21 14:30:40 +0200 |
---|---|---|
committer | Joris | 2016-08-21 14:30:40 +0200 |
commit | 75804df1cb231033f94183e41cdf79d36d8f6710 (patch) | |
tree | 48b7932285091fdbdaba6d77586859c1e1750ce0 /src/client/elm/LoggedIn/Income/View.elm | |
parent | 3889d21ab58fbbc0134854b95013196a82e8d510 (diff) | |
download | budget-75804df1cb231033f94183e41cdf79d36d8f6710.tar.gz budget-75804df1cb231033f94183e41cdf79d36d8f6710.tar.bz2 budget-75804df1cb231033f94183e41cdf79d36d8f6710.zip |
Show a message if there is an error during a server request
Diffstat (limited to 'src/client/elm/LoggedIn/Income/View.elm')
-rw-r--r-- | src/client/elm/LoggedIn/Income/View.elm | 14 |
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) ] |