Fix var name to croatianFormMessage
This commit is contained in:
parent
1fca3ceea3
commit
a6e11245cf
@ -5,22 +5,22 @@ import Yesod.Form.Types (FormMessage (..))
|
||||
import Data.Monoid (mappend)
|
||||
import Data.Text (Text)
|
||||
|
||||
englishFormMessage :: FormMessage -> Text
|
||||
englishFormMessage (MsgInvalidInteger t) = "Cjelobrojna vrijednost nije valjana: " `mappend` t
|
||||
englishFormMessage (MsgInvalidNumber t) = "Broj nije valjan: " `mappend` t
|
||||
englishFormMessage (MsgInvalidEntry t) = "Unos nije valjan: " `mappend` t
|
||||
englishFormMessage MsgInvalidTimeFormat = "Vrijeme nije valjano, mora biti u obliku HH:MM[:SS]"
|
||||
englishFormMessage MsgInvalidDay = "Dan nije valjan, mora biti u obliku GGGG-MM-DD"
|
||||
englishFormMessage (MsgInvalidUrl t) = "URL adresa nije valjana: " `mappend` t
|
||||
englishFormMessage (MsgInvalidEmail t) = "Adresa e-pošte nije valjana: " `mappend` t
|
||||
englishFormMessage (MsgInvalidHour t) = "Sat nije valjan: " `mappend` t
|
||||
englishFormMessage (MsgInvalidMinute t) = "Minuta nije valjana: " `mappend` t
|
||||
englishFormMessage (MsgInvalidSecond t) = "Sekunda nije valjana: " `mappend` t
|
||||
englishFormMessage MsgCsrfWarning = "Potvrdite slanje obrasca radi zaštite od XSRF napada,"
|
||||
englishFormMessage MsgValueRequired = "Potrebno je unijeti vrijednost"
|
||||
englishFormMessage (MsgInputNotFound t) = "Unos nije pronađen: " `mappend` t
|
||||
englishFormMessage MsgSelectNone = "<nema>"
|
||||
englishFormMessage (MsgInvalidBool t) = "Logička vrijednost nije valjana: " `mappend` t
|
||||
englishFormMessage MsgBoolYes = "Da"
|
||||
englishFormMessage MsgBoolNo = "Ne"
|
||||
englishFormMessage MsgDelete = "Izbrisati?"
|
||||
croatianFormMessage :: FormMessage -> Text
|
||||
croatianFormMessage (MsgInvalidInteger t) = "Cjelobrojna vrijednost nije valjana: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidNumber t) = "Broj nije valjan: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidEntry t) = "Unos nije valjan: " `mappend` t
|
||||
croatianFormMessage MsgInvalidTimeFormat = "Vrijeme nije valjano, mora biti u obliku HH:MM[:SS]"
|
||||
croatianFormMessage MsgInvalidDay = "Dan nije valjan, mora biti u obliku GGGG-MM-DD"
|
||||
croatianFormMessage (MsgInvalidUrl t) = "URL adresa nije valjana: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidEmail t) = "Adresa e-pošte nije valjana: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidHour t) = "Sat nije valjan: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidMinute t) = "Minuta nije valjana: " `mappend` t
|
||||
croatianFormMessage (MsgInvalidSecond t) = "Sekunda nije valjana: " `mappend` t
|
||||
croatianFormMessage MsgCsrfWarning = "Potvrdite slanje obrasca radi zaštite od XSRF napada,"
|
||||
croatianFormMessage MsgValueRequired = "Potrebno je unijeti vrijednost"
|
||||
croatianFormMessage (MsgInputNotFound t) = "Unos nije pronađen: " `mappend` t
|
||||
croatianFormMessage MsgSelectNone = "<nema>"
|
||||
croatianFormMessage (MsgInvalidBool t) = "Logička vrijednost nije valjana: " `mappend` t
|
||||
croatianFormMessage MsgBoolYes = "Da"
|
||||
croatianFormMessage MsgBoolNo = "Ne"
|
||||
croatianFormMessage MsgDelete = "Izbrisati?"
|
||||
|
||||
Loading…
Reference in New Issue
Block a user