mirror of
				https://github.com/TheAnachronism/docspell.git
				synced 2025-11-04 12:30:12 +00:00 
			
		
		
		
	Externalize strings in manage-data page
This commit is contained in:
		@@ -3,7 +3,6 @@ module Data.CustomFieldType exposing
 | 
			
		||||
    , all
 | 
			
		||||
    , asString
 | 
			
		||||
    , fromString
 | 
			
		||||
    , label
 | 
			
		||||
    )
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
@@ -39,25 +38,6 @@ asString ft =
 | 
			
		||||
            "money"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
label : CustomFieldType -> String
 | 
			
		||||
label ft =
 | 
			
		||||
    case ft of
 | 
			
		||||
        Text ->
 | 
			
		||||
            "Text"
 | 
			
		||||
 | 
			
		||||
        Numeric ->
 | 
			
		||||
            "Numeric"
 | 
			
		||||
 | 
			
		||||
        Date ->
 | 
			
		||||
            "Date"
 | 
			
		||||
 | 
			
		||||
        Boolean ->
 | 
			
		||||
            "Boolean"
 | 
			
		||||
 | 
			
		||||
        Money ->
 | 
			
		||||
            "Money"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
fromString : String -> Maybe CustomFieldType
 | 
			
		||||
fromString str =
 | 
			
		||||
    case String.toLower str of
 | 
			
		||||
 
 | 
			
		||||
@@ -3,7 +3,6 @@ module Data.EquipmentUse exposing
 | 
			
		||||
    , all
 | 
			
		||||
    , asString
 | 
			
		||||
    , fromString
 | 
			
		||||
    , label
 | 
			
		||||
    )
 | 
			
		||||
 | 
			
		||||
import Api.Model.Equipment exposing (Equipment)
 | 
			
		||||
@@ -37,16 +36,6 @@ asString pu =
 | 
			
		||||
            "disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
label : EquipmentUse -> String
 | 
			
		||||
label pu =
 | 
			
		||||
    case pu of
 | 
			
		||||
        Concerning ->
 | 
			
		||||
            "Concerning"
 | 
			
		||||
 | 
			
		||||
        Disabled ->
 | 
			
		||||
            "Disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
all : List EquipmentUse
 | 
			
		||||
all =
 | 
			
		||||
    [ Concerning, Disabled ]
 | 
			
		||||
 
 | 
			
		||||
@@ -3,7 +3,6 @@ module Data.OrgUse exposing
 | 
			
		||||
    , all
 | 
			
		||||
    , asString
 | 
			
		||||
    , fromString
 | 
			
		||||
    , label
 | 
			
		||||
    )
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
@@ -35,16 +34,6 @@ asString pu =
 | 
			
		||||
            "disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
label : OrgUse -> String
 | 
			
		||||
label pu =
 | 
			
		||||
    case pu of
 | 
			
		||||
        Correspondent ->
 | 
			
		||||
            "Correspondent"
 | 
			
		||||
 | 
			
		||||
        Disabled ->
 | 
			
		||||
            "Disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
all : List OrgUse
 | 
			
		||||
all =
 | 
			
		||||
    [ Correspondent, Disabled ]
 | 
			
		||||
 
 | 
			
		||||
@@ -3,7 +3,6 @@ module Data.PersonUse exposing
 | 
			
		||||
    , all
 | 
			
		||||
    , asString
 | 
			
		||||
    , fromString
 | 
			
		||||
    , label
 | 
			
		||||
    , spanPersonList
 | 
			
		||||
    )
 | 
			
		||||
 | 
			
		||||
@@ -52,22 +51,6 @@ asString pu =
 | 
			
		||||
            "disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
label : PersonUse -> String
 | 
			
		||||
label pu =
 | 
			
		||||
    case pu of
 | 
			
		||||
        Correspondent ->
 | 
			
		||||
            "Correspondent"
 | 
			
		||||
 | 
			
		||||
        Concerning ->
 | 
			
		||||
            "Concerning"
 | 
			
		||||
 | 
			
		||||
        Both ->
 | 
			
		||||
            "Both"
 | 
			
		||||
 | 
			
		||||
        Disabled ->
 | 
			
		||||
            "Disabled"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
all : List PersonUse
 | 
			
		||||
all =
 | 
			
		||||
    [ Correspondent, Concerning, Both, Disabled ]
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user