{-# 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 :: FormMessage -> Text dutchFormMessage (MsgInvalidInteger Text t) = Text "Ongeldig aantal: " forall a. Monoid a => a -> a -> a `Data.Monoid.mappend` Text t dutchFormMessage (MsgInvalidNumber Text t) = Text "Ongeldig getal: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage (MsgInvalidEntry Text t) = Text "Ongeldige invoer: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage FormMessage MsgInvalidTimeFormat = Text "Ongeldige tijd, het juiste formaat is (UU:MM[:SS])" dutchFormMessage FormMessage MsgInvalidDay = Text "Ongeldige datum, het juiste formaat is (JJJJ-MM-DD)" dutchFormMessage (MsgInvalidUrl Text t) = Text "Ongeldige URL: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage (MsgInvalidEmail Text t) = Text "Ongeldig e-mail adres: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage (MsgInvalidHour Text t) = Text "Ongeldig uur: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage (MsgInvalidMinute Text t) = Text "Ongeldige minuut: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage (MsgInvalidSecond Text t) = Text "Ongeldige seconde: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage FormMessage MsgCsrfWarning = Text "Bevestig het indienen van het formulier, dit als veiligheidsmaatregel tegen \"cross-site request forgery\" aanvallen." dutchFormMessage FormMessage MsgValueRequired = Text "Verplicht veld" dutchFormMessage (MsgInputNotFound Text t) = Text "Geen invoer gevonden: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage FormMessage MsgSelectNone = Text "<Geen>" dutchFormMessage (MsgInvalidBool Text t) = Text "Ongeldige waarheidswaarde: " forall a. Monoid a => a -> a -> a `mappend` Text t dutchFormMessage FormMessage MsgBoolYes = Text "Ja" dutchFormMessage FormMessage MsgBoolNo = Text "Nee" dutchFormMessage FormMessage MsgDelete = Text "Verwijderen?" dutchFormMessage (MsgInvalidHexColorFormat Text t) = Text "Ongeldige kleur, moet de hexadecimale indeling #rrggbb hebben: " forall a. Monoid a => a -> a -> a `mappend` Text t