Externalize more strings missed before

This commit is contained in:
Eike Kettner
2021-04-10 16:02:34 +02:00
parent e063a10663
commit 92ae22a68d
52 changed files with 219 additions and 253 deletions

View File

@ -2,21 +2,21 @@ module Messages.Comp.PersonForm exposing (..)
import Data.ContactType exposing (ContactType)
import Data.PersonUse exposing (PersonUse)
import Messages.Basics
import Messages.Comp.AddressForm
import Messages.Data.ContactType
import Messages.Data.PersonUse
type alias Texts =
{ addressForm : Messages.Comp.AddressForm.Texts
{ basics : Messages.Basics.Texts
, addressForm : Messages.Comp.AddressForm.Texts
, personUseLabel : PersonUse -> String
, name : String
, useOfPerson : String
, useAsConcerningOnly : String
, useAsCorrespondentOnly : String
, useAsBoth : String
, dontUseForSuggestions : String
, organization : String
, chooseAnOrg : String
, address : String
, contacts : String
@ -27,15 +27,14 @@ type alias Texts =
gb : Texts
gb =
{ addressForm = Messages.Comp.AddressForm.gb
{ basics = Messages.Basics.gb
, addressForm = Messages.Comp.AddressForm.gb
, personUseLabel = Messages.Data.PersonUse.gb
, name = "Name"
, useOfPerson = "Use of this person"
, useAsConcerningOnly = "Use as concerning person only"
, useAsCorrespondentOnly = "Use as correspondent person only"
, useAsBoth = "Use as both concerning or correspondent person"
, dontUseForSuggestions = "Do not use for suggestions."
, organization = "Organization"
, chooseAnOrg = "Choose an organization"
, address = "Address"
, contacts = "Contacts"