From 1fca3ceea38d856bae7fd8fed58adc20ecf06b20 Mon Sep 17 00:00:00 2001 From: vlatkoB Date: Wed, 20 Jan 2016 08:48:15 +0100 Subject: [PATCH 1/2] Croatian translation --- yesod-auth/Yesod/Auth/Message.hs | 45 +++++++++++++++++++++++++- yesod-form/Yesod/Form/I18n/Croatian.hs | 26 +++++++++++++++ 2 files changed, 70 insertions(+), 1 deletion(-) create mode 100644 yesod-form/Yesod/Form/I18n/Croatian.hs diff --git a/yesod-auth/Yesod/Auth/Message.hs b/yesod-auth/Yesod/Auth/Message.hs index 8cced4a2..f3a06e15 100644 --- a/yesod-auth/Yesod/Auth/Message.hs +++ b/yesod-auth/Yesod/Auth/Message.hs @@ -19,7 +19,7 @@ module Yesod.Auth.Message , dutchMessage ) where -import Data.Monoid (mappend) +import Data.Monoid (mappend,(<>)) import Data.Text (Text) data AuthMessage = @@ -678,3 +678,46 @@ dutchMessage (IdentifierNotFound ident) = "Inloggegevens niet gevonden: " `mappe dutchMessage Logout = "Log Out" -- FIXME NOT TRANSLATED dutchMessage LogoutTitle = "Log Out" -- FIXME NOT TRANSLATED dutchMessage AuthError = "Verificatiefout" -- FIXME by Google Translate + +croatianMessage :: AuthMessage -> Text +croatianMessage NoOpenID = "Nije pronađen OpenID identifikator" +croatianMessage LoginOpenID = "Prijava uz OpenID" +croatianMessage LoginGoogle = "Prijava uz Google" +croatianMessage LoginYahoo = "Prijava uz Yahoo" +croatianMessage Facebook = "Prijava uz Facebook" +croatianMessage LoginViaEmail = "Prijava putem e-pošte" +croatianMessage Email = "E-pošta" +croatianMessage UserName = "Korisničko ime" +croatianMessage Password = "Lozinka" +croatianMessage Register = "Registracija" +croatianMessage RegisterLong = "Registracija novog računa" +croatianMessage EnterEmail = "Dolje unesite adresu e-pošte, pa ćemo vam poslati e-poruku za potvrdu." +croatianMessage PasswordResetPrompt = "Dolje unesite adresu e-pošte ili korisničko ime, pa ćemo vam poslati e-poruku za potvrdu." +croatianMessage ConfirmationEmailSentTitle = "E-poruka za potvrdu" +croatianMessage (ConfirmationEmailSent email) = "E-poruka za potvrdu poslana je na adresu " <> email <> "." +croatianMessage AddressVerified = "Adresa ovjerena, postavite novu lozinku" +croatianMessage InvalidKeyTitle = "Ključ za ovjeru nije valjan" +croatianMessage InvalidKey = "Nažalost, taj ključ za ovjeru nije valjan." +croatianMessage InvalidEmailPass = "Kombinacija e-pošte i lozinke nije valjana" +croatianMessage InvalidUsernamePass = "Kombinacija korisničkog imena i lozinke nije valjana" +croatianMessage BadSetPass = "Za postavljanje lozinke morate biti prijavljeni" +croatianMessage SetPassTitle = "Postavi lozinku" +croatianMessage SetPass = "Postavite novu lozinku" +croatianMessage NewPass = "Nova lozinka" +croatianMessage ConfirmPass = "Potvrda lozinke" +croatianMessage PassMismatch = "Lozinke se ne podudaraju, pokušajte ponovo" +croatianMessage PassUpdated = "Lozinka ažurirana" +croatianMessage InvalidLogin = "Prijava nije valjana" +croatianMessage NowLoggedIn = "Sada ste prijavljeni u" +croatianMessage LoginTitle = "Prijava" +croatianMessage PleaseProvideUsername = "Unesite korisničko ime" +croatianMessage PleaseProvidePassword = "Unesite lozinku" +croatianMessage NoIdentifierProvided = "Nisu dani e-pošta/korisničko ime" +croatianMessage InvalidEmailAddress = "Dana adresa e-pošte nije valjana" +croatianMessage PasswordResetTitle = "Poništavanje lozinke" +croatianMessage ProvideIdentifier = "E-pošta ili korisničko ime" +croatianMessage SendPasswordResetEmail = "Pošalji e-poruku za poništavanje lozinke" +croatianMessage (IdentifierNotFound ident) = "Korisničko ime/e-pošta nisu pronađeni: " <> ident +croatianMessage Logout = "Odjava" +croatianMessage LogoutTitle = "Odjava" +croatianMessage AuthError = "Pogreška provjere autentičnosti" diff --git a/yesod-form/Yesod/Form/I18n/Croatian.hs b/yesod-form/Yesod/Form/I18n/Croatian.hs new file mode 100644 index 00000000..194a40e6 --- /dev/null +++ b/yesod-form/Yesod/Form/I18n/Croatian.hs @@ -0,0 +1,26 @@ +{-# LANGUAGE OverloadedStrings #-} +module Yesod.Form.I18n.Croatian where + +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 = "" +englishFormMessage (MsgInvalidBool t) = "Logička vrijednost nije valjana: " `mappend` t +englishFormMessage MsgBoolYes = "Da" +englishFormMessage MsgBoolNo = "Ne" +englishFormMessage MsgDelete = "Izbrisati?" From a6e11245cfa6d22cc6fd4035ade4b84b33b402ba Mon Sep 17 00:00:00 2001 From: vlatkoB Date: Wed, 20 Jan 2016 09:47:28 +0100 Subject: [PATCH 2/2] Fix var name to croatianFormMessage --- yesod-form/Yesod/Form/I18n/Croatian.hs | 38 +++++++++++++------------- 1 file changed, 19 insertions(+), 19 deletions(-) diff --git a/yesod-form/Yesod/Form/I18n/Croatian.hs b/yesod-form/Yesod/Form/I18n/Croatian.hs index 194a40e6..1f6eca6f 100644 --- a/yesod-form/Yesod/Form/I18n/Croatian.hs +++ b/yesod-form/Yesod/Form/I18n/Croatian.hs @@ -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 = "" -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 = "" +croatianFormMessage (MsgInvalidBool t) = "Logička vrijednost nije valjana: " `mappend` t +croatianFormMessage MsgBoolYes = "Da" +croatianFormMessage MsgBoolNo = "Ne" +croatianFormMessage MsgDelete = "Izbrisati?"