Merge pull request #865 from lambdacms/form-i18n-nl

Adds dutch form translations
This commit is contained in:
Greg Weber 2014-11-24 10:05:15 -08:00
commit c284e1f8b0
2 changed files with 27 additions and 0 deletions

View File

@ -0,0 +1,26 @@
{-# LANGUAGE OverloadedStrings #-}
module Yesod.Form.I18n.Dutch where
import Yesod.Form.Types (FormMessage (..))
import Data.Monoid (mappend)
import Data.Text (Text)
dutchFormMessage :: FormMessage -> Text
dutchFormMessage (MsgInvalidInteger t) = "Ongeldig aantal: " `mappend` t
dutchFormMessage (MsgInvalidNumber t) = "Ongeldig getal: " `mappend` t
dutchFormMessage (MsgInvalidEntry t) = "Ongeldige invoer: " `mappend` t
dutchFormMessage MsgInvalidTimeFormat = "Ongeldige tijd, het juiste formaat is (UU:MM[:SS])"
dutchFormMessage MsgInvalidDay = "Ongeldige datum, het juiste formaat is (JJJJ-MM-DD)"
dutchFormMessage (MsgInvalidUrl t) = "Ongeldige URL: " `mappend` t
dutchFormMessage (MsgInvalidEmail t) = "Ongeldig e-mail adres: " `mappend` t
dutchFormMessage (MsgInvalidHour t) = "Ongeldig uur: " `mappend` t
dutchFormMessage (MsgInvalidMinute t) = "Ongeldige minuut: " `mappend` t
dutchFormMessage (MsgInvalidSecond t) = "Ongeldige seconde: " `mappend` t
dutchFormMessage MsgCsrfWarning = "Bevestig het indienen van het formulier, dit als veiligheidsmaatregel tegen \"cross-site request forgery\" aanvallen."
dutchFormMessage MsgValueRequired = "Verplicht veld"
dutchFormMessage (MsgInputNotFound t) = "Geen invoer gevonden: " `mappend` t
dutchFormMessage MsgSelectNone = "<Geen>"
dutchFormMessage (MsgInvalidBool t) = "Ongeldige waarheidswaarde: " `mappend` t
dutchFormMessage MsgBoolYes = "Ja"
dutchFormMessage MsgBoolNo = "Nee"
dutchFormMessage MsgDelete = "Verwijderen?"

View File

@ -63,6 +63,7 @@ library
Yesod.Form.I18n.Japanese
Yesod.Form.I18n.Czech
Yesod.Form.I18n.Russian
Yesod.Form.I18n.Dutch
-- FIXME Yesod.Helpers.Crud
ghc-options: -Wall