yesod-form 1.3.12 → 1.3.13
raw patch · 2 files changed
+28/−1 lines, 2 files
Files
- Yesod/Form/I18n/Russian.hs +26/−0
- yesod-form.cabal +2/−1
+ Yesod/Form/I18n/Russian.hs view
@@ -0,0 +1,26 @@+{-# LANGUAGE OverloadedStrings #-}+module Yesod.Form.I18n.Russian where++import Yesod.Form.Types (FormMessage (..))+import Data.Monoid (mappend)+import Data.Text (Text)++russianFormMessage :: FormMessage -> Text+russianFormMessage (MsgInvalidInteger t) = "Неверно записано целое число: " `mappend` t+russianFormMessage (MsgInvalidNumber t) = "Неверный формат числа: " `mappend` t+russianFormMessage (MsgInvalidEntry t) = "Неверный выбор: " `mappend` t+russianFormMessage MsgInvalidTimeFormat = "Неверно указано время, используйте формат ЧЧ:ММ[:СС]"+russianFormMessage MsgInvalidDay = "Неверно указана дата, используйте формат ГГГГ-ММ-ДД"+russianFormMessage (MsgInvalidUrl t) = "Неверно указан URL адрес: " `mappend` t+russianFormMessage (MsgInvalidEmail t) = "Неверно указана электронная почта: " `mappend` t+russianFormMessage (MsgInvalidHour t) = "Неверно указан час: " `mappend` t+russianFormMessage (MsgInvalidMinute t) = "Неверно указаны минуты: " `mappend` t+russianFormMessage (MsgInvalidSecond t) = "Неверны указаны секунды: " `mappend` t+russianFormMessage MsgCsrfWarning = "Для защиты от межсайтовой подделки запросов (CSRF), пожалуйста, подтвердите отправку данных формы."+russianFormMessage MsgValueRequired = "Обязательно к заполнению"+russianFormMessage (MsgInputNotFound t) = "Поле не найдено: " `mappend` t+russianFormMessage MsgSelectNone = "<Не выбрано>"+russianFormMessage (MsgInvalidBool t) = "Неверное логическое значение: " `mappend` t+russianFormMessage MsgBoolYes = "Да"+russianFormMessage MsgBoolNo = "Нет"+russianFormMessage MsgDelete = "Удалить?"
yesod-form.cabal view
@@ -1,5 +1,5 @@ name: yesod-form-version: 1.3.12+version: 1.3.13 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>@@ -57,6 +57,7 @@ Yesod.Form.I18n.Norwegian Yesod.Form.I18n.Japanese Yesod.Form.I18n.Czech+ Yesod.Form.I18n.Russian -- FIXME Yesod.Helpers.Crud ghc-options: -Wall