2024-11-10 22:55:49 -06:00
|
|
|
module Config.Identity exposing (..)
|
|
|
|
|
|
2024-11-11 18:57:51 -06:00
|
|
|
|
|
|
|
|
type alias PageInput =
|
|
|
|
|
{ pageHome : String
|
|
|
|
|
, pageContact : String
|
|
|
|
|
, pageDebate : String
|
|
|
|
|
, pageDodgers : String
|
|
|
|
|
, pageHyperBlog : String
|
|
|
|
|
, pageInterviews : String
|
|
|
|
|
, pageNutriDex : String
|
|
|
|
|
, pagePlatforms : String
|
|
|
|
|
, pageServices : String
|
|
|
|
|
, pageSupport : String
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
pageNames : PageInput
|
|
|
|
|
pageNames =
|
2024-11-26 21:17:36 -06:00
|
|
|
{ pageHome = "upRootHealth"
|
|
|
|
|
, pagePlatforms = "platforms"
|
|
|
|
|
, pageServices = "services"
|
|
|
|
|
, pageDodgers = "cuckList"
|
|
|
|
|
, pageDebate = "arguments"
|
|
|
|
|
, pageHyperBlog = "hyperBlog"
|
|
|
|
|
, pageNutriDex = "nutriDex"
|
|
|
|
|
, pageInterviews = "interviews"
|
|
|
|
|
, pageContact = "contact"
|
|
|
|
|
, pageSupport = "support"
|
2024-11-11 18:57:51 -06:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
createPageName : String -> String
|
|
|
|
|
createPageName pageName =
|
2024-11-26 21:17:36 -06:00
|
|
|
pageNames.pageHome ++ " :: " ++ pageName
|
2024-11-11 18:57:51 -06:00
|
|
|
|
|
|
|
|
|
|
|
|
|
contactName : String
|
|
|
|
|
contactName =
|
|
|
|
|
createPageName pageNames.pageContact
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
debateName : String
|
|
|
|
|
debateName =
|
|
|
|
|
createPageName pageNames.pageDebate
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
dodgersName : String
|
|
|
|
|
dodgersName =
|
|
|
|
|
createPageName pageNames.pageDodgers
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
hyperBlogName : String
|
|
|
|
|
hyperBlogName =
|
|
|
|
|
createPageName pageNames.pageHyperBlog
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
interviewsName : String
|
|
|
|
|
interviewsName =
|
|
|
|
|
createPageName pageNames.pageInterviews
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
nutriDexName : String
|
|
|
|
|
nutriDexName =
|
|
|
|
|
createPageName pageNames.pageNutriDex
|
|
|
|
|
|
2024-11-11 00:43:03 -06:00
|
|
|
|
2024-11-11 03:57:54 -06:00
|
|
|
platformsName : String
|
2024-11-11 18:57:51 -06:00
|
|
|
platformsName =
|
|
|
|
|
createPageName pageNames.pagePlatforms
|
|
|
|
|
|
|
|
|
|
|
2024-11-11 00:43:03 -06:00
|
|
|
servicesName : String
|
2024-11-11 18:57:51 -06:00
|
|
|
servicesName =
|
|
|
|
|
createPageName pageNames.pageServices
|
2024-11-11 00:43:03 -06:00
|
|
|
|
2024-11-11 03:57:54 -06:00
|
|
|
|
2024-11-11 18:57:51 -06:00
|
|
|
supportName : String
|
|
|
|
|
supportName =
|
|
|
|
|
createPageName pageNames.pageSupport
|
