diff --git a/yesod-auth/Yesod/Auth/Message.hs b/yesod-auth/Yesod/Auth/Message.hs index 9be0776b..383ef98f 100644 --- a/yesod-auth/Yesod/Auth/Message.hs +++ b/yesod-auth/Yesod/Auth/Message.hs @@ -7,6 +7,7 @@ module Yesod.Auth.Message , englishMessage , portugueseMessage , swedishMessage + , germanMessage ) where import Data.Monoid (mappend) @@ -148,3 +149,37 @@ swedishMessage NowLoggedIn = "Du är nu inloggad" swedishMessage LoginTitle = "Logga in" swedishMessage PleaseProvideUsername = "Vänligen fyll i användarnamn" swedishMessage PleaseProvidePassword = "Vänligen fyll i lösenord" + +germanMessage :: AuthMessage -> Text +germanMessage NoOpenID = "Kein OpenID-Identifier gefunden" +germanMessage LoginOpenID = "Login via OpenID" +germanMessage LoginGoogle = "Login via Google" +germanMessage LoginYahoo = "Login via Yahoo" +germanMessage Email = "Email" +germanMessage Password = "Passwort" +germanMessage Register = "Registrieren" +germanMessage RegisterLong = "Neuen Account registrieren" +germanMessage EnterEmail = "Bitte die e-Mail Adresse angeben, eine Bestätigungsmail wird verschickt." +germanMessage ConfirmationEmailSentTitle = "Bestätigung verschickt." +germanMessage (ConfirmationEmailSent email) = + "Eine Bestätigung wurde an " `mappend` + email `mappend` + "versandt." +germanMessage AddressVerified = "Adresse bestätigt, bitte neues Passwort angeben" +germanMessage InvalidKeyTitle = "Ungültiger Bestätigungsschlüssel" +germanMessage InvalidKey = "Das war leider ein ungültiger Bestätigungsschlüssel" +germanMessage InvalidEmailPass = "Ungültiger Nutzername oder Passwort" +germanMessage BadSetPass = "Um das Passwort zu ändern muss man eingeloggt sein" +germanMessage SetPassTitle = "Passwort angeben" +germanMessage SetPass = "Neues Passwort angeben" +germanMessage NewPass = "Neues Passwort" +germanMessage ConfirmPass = "Bestätigen" +germanMessage PassMismatch = "Die Passwörter stimmten nicht überein" +germanMessage PassUpdated = "Passwort überschrieben" +germanMessage Facebook = "Login über Facebook" +germanMessage LoginViaEmail = "Login via e-Mail" +germanMessage InvalidLogin = "Ungültiger Login" +germanMessage NowLoggedIn = "Login erfolgreich" +germanMessage LoginTitle = "Login" +germanMessage PleaseProvideUsername = "Bitte Nutzername angeben" +germanMessage PleaseProvidePassword = "Bitte Passwort angeben" diff --git a/yesod/scaffold/Import.hs.cg b/yesod/scaffold/Import.hs.cg index 5083f615..7fdd7160 100644 --- a/yesod/scaffold/Import.hs.cg +++ b/yesod/scaffold/Import.hs.cg @@ -6,6 +6,7 @@ module Import , Text , module Data.Monoid , module Control.Applicative + , module Settings.StaticFiles ) where import Prelude hiding (writeFile, readFile, head, tail, init, last) @@ -14,6 +15,7 @@ import Foundation import Data.Monoid (Monoid (mappend, mempty, mconcat)) import Control.Applicative ((<$>), (<*>), pure) import Data.Text (Text) +import Settings.StaticFiles infixr 5 <> (<>) :: Monoid m => m -> m -> m diff --git a/yesod/scaffold/project.cabal.cg b/yesod/scaffold/project.cabal.cg index 9a43e551..79c75c47 100644 --- a/yesod/scaffold/project.cabal.cg +++ b/yesod/scaffold/project.cabal.cg @@ -42,7 +42,6 @@ library OverloadedStrings NoImplicitPrelude CPP - OverloadedStrings MultiParamTypeClasses TypeFamilies GADTs