yesod-form 1.3.0.1 → 1.3.1

raw patch · 2 files changed

+28/−1 lines, 2 files

Files

• Yesod/Form/I18n/Czech.hs +26/−0
• yesod-form.cabal +2/−1

@@ -0,0 +1,26 @@+{-# LANGUAGE OverloadedStrings #-}+module Yesod.Form.I18n.Czech where++import Yesod.Form.Types (FormMessage (..))+import Data.Monoid (mappend)+import Data.Text (Text)++czechFormMessage :: FormMessage -> Text+czechFormMessage (MsgInvalidInteger t) = "Neplatné celé číslo: " `mappend` t+czechFormMessage (MsgInvalidNumber t) = "Neplatné číslo: " `mappend` t+czechFormMessage (MsgInvalidEntry t) = "Neplatná položka: " `mappend` t+czechFormMessage MsgInvalidTimeFormat = "Neplatný čas, musí být ve formátu HH:MM[:SS]"+czechFormMessage MsgInvalidDay = "Neplatný den, musí být formátu YYYY-MM-DD"+czechFormMessage (MsgInvalidUrl t) = "Neplatná URL: " `mappend` t+czechFormMessage (MsgInvalidEmail t) = "Neplatná e-mailová adresa: " `mappend` t+czechFormMessage (MsgInvalidHour t) = "Neplatná hodina: " `mappend` t+czechFormMessage (MsgInvalidMinute t) = "Neplatná minuta: " `mappend` t+czechFormMessage (MsgInvalidSecond t) = "Neplatná sekunda: " `mappend` t+czechFormMessage MsgCsrfWarning = "Prosím potvrďte odeslání formuláře jako ochranu před útekem „cross-site request forgery“."+czechFormMessage MsgValueRequired = "Hodnota je vyžadována"+czechFormMessage (MsgInputNotFound t) = "Vstup nebyl nalezen: " `mappend` t+czechFormMessage MsgSelectNone = "<Nic>"+czechFormMessage (MsgInvalidBool t) = "Neplatná pravdivostní hodnota: " `mappend` t+czechFormMessage MsgBoolYes = "Ano"+czechFormMessage MsgBoolNo = "Ne"+czechFormMessage MsgDelete = "Smazat?"

@@ -1,5 +1,5 @@ name:            yesod-form-version:         1.3.0.1+version:         1.3.1 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -54,6 +54,7 @@                      Yesod.Form.I18n.French                      Yesod.Form.I18n.Norwegian                      Yesod.Form.I18n.Japanese
+                     Yesod.Form.I18n.Czech                      -- FIXME Yesod.Helpers.Crud     ghc-options:     -Wall