Externalize strings for document language

2025-11-04 12:30:12 +00:00 · 2021-04-02 23:30:51 +02:00
parent dac95e81e6
commit e76d574ea3
9 changed files with 72 additions and 55 deletions
--- a/modules/webapp/src/main/elm/Data/Language.elm
+++ b/modules/webapp/src/main/elm/Data/Language.elm
@@ -3,7 +3,6 @@ module Data.Language exposing
    , all
    , fromString
    , toIso3
-    , toName
    )


@@ -125,55 +124,6 @@ toIso3 lang =
            "lav"


-toName : Language -> String
-toName lang =
-    case lang of
-        German ->
-            "German"
-
-        English ->
-            "English"
-
-        French ->
-            "French"
-
-        Italian ->
-            "Italian"
-
-        Spanish ->
-            "Spanish"
-
-        Portuguese ->
-            "Portuguese"
-
-        Czech ->
-            "Czech"
-
-        Danish ->
-            "Danish"
-
-        Finnish ->
-            "Finnish"
-
-        Norwegian ->
-            "Norwegian"
-
-        Swedish ->
-            "Swedish"
-
-        Russian ->
-            "Russian"
-
-        Romanian ->
-            "Romanian"
-
-        Dutch ->
-            "Dutch"
-
-        Latvian ->
-            "Latvian"
-
-
 all : List Language
 all =
    [ German