feat: added dodger page

frontend/src/Config/Identity.elm

@@ -1,16 +1,89 @@
 module Config.Identity exposing (..)
 
-homeName : String
-homeName = "The Nutrivore"
+import Element exposing (..)
 
-platformsName : String
-platformsName = homeName ++ " | Platforms"
 
-servicesName : String
-servicesName = homeName ++ " | Services"
+type alias PageInput =
+    { pageHome : String
+    , pageContact : String
+    , pageDebate : String
+    , pageDodgers : String
+    , pageHyperBlog : String
+    , pageInterviews : String
+    , pageNutriDex : String
+    , pagePlatforms : String
+    , pagePropositions : String
+    , pageServices : String
+    , pageSupport : String
+    }
+
+
+pageNames : PageInput
+pageNames =
+    { pageHome = "The Nutrivore"
+    , pagePlatforms = "Platforms"
+    , pageServices = "Services"
+    , pageDebate = "Debate"
+    , pageDodgers = "Dodgers"
+    , pagePropositions = "Propositions"
+    , pageHyperBlog = "HyperBlog"
+    , pageNutriDex = "NutriDex"
+    , pageInterviews = "Interviews"
+    , pageContact = "Contact"
+    , pageSupport = "Support"
+    }
+
+
+createPageName : String -> String
+createPageName pageName =
+    pageNames.pageHome ++ " | " ++ pageName
+
+
+contactName : String
+contactName =
+    createPageName pageNames.pageContact
+
+
+debateName : String
+debateName =
+    createPageName pageNames.pageDebate
 
-supportName : String
-supportName = homeName ++ " | Support"
 
 dodgersName : String
-dodgersName = homeName ++ " | Dodgers"
+dodgersName =
+    createPageName pageNames.pageDodgers
+
+
+hyperBlogName : String
+hyperBlogName =
+    createPageName pageNames.pageHyperBlog
+
+
+interviewsName : String
+interviewsName =
+    createPageName pageNames.pageInterviews
+
+
+nutriDexName : String
+nutriDexName =
+    createPageName pageNames.pageNutriDex
+
+
+platformsName : String
+platformsName =
+    createPageName pageNames.pagePlatforms
+
+
+propositionsName : String
+propositionsName =
+    createPageName pageNames.pagePropositions
+
+
+servicesName : String
+servicesName =
+    createPageName pageNames.pageServices
+
+
+supportName : String
+supportName =
+    createPageName pageNames.pageSupport