diff options
author | Joris | 2018-10-28 17:57:58 +0100 |
---|---|---|
committer | Joris | 2018-10-28 17:57:58 +0100 |
commit | 40b4994797a797b1fa86cafda789a5c488730c6d (patch) | |
tree | ad195b31fa442821b9de8f99364e254f0f41935f /common/src/Common/Message/Translation.hs | |
parent | df83b634006c699cfa1e921bf74ce951a906a62f (diff) |
Delete payment
Diffstat (limited to 'common/src/Common/Message/Translation.hs')
-rw-r--r-- | common/src/Common/Message/Translation.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/common/src/Common/Message/Translation.hs b/common/src/Common/Message/Translation.hs index 5ea12ad..70eb978 100644 --- a/common/src/Common/Message/Translation.hs +++ b/common/src/Common/Message/Translation.hs @@ -157,16 +157,16 @@ m l Form_AlreadyExists = English -> "Dupplicate field" French -> "Doublon" -m l Form_CostMustNotBeNull = - case l of - English -> "Cost must not be zero" - French -> "Le coût ne doît pas être nul" - -m l Form_Empty = +m l Form_NonEmpty = case l of English -> "Required field" French -> "Champ requis" +m l Form_NonNullNumber = + case l of + English -> "Number must not be null" + French -> "Le nombre ne doit pas être nul" + m l (Form_GreaterIntThan number) = case l of English -> T.concat [ "Integer smaller than ", T.pack . show $ number, " or equal required" ] |