feat: added link to home page

This commit is contained in:
Nick 2024-12-29 19:33:40 -06:00
parent 9541412419
commit b02fe9a136
2 changed files with 23 additions and 5 deletions

View file

@ -78,7 +78,10 @@ detailTitleLink : ThemeColor -> String -> Element msg
detailTitleLink colour item = detailTitleLink colour item =
el el
(getHoverColours colour (getHoverColours colour
++ titleFormat colour ++ (titleFormat colour
++ [ pointer
]
)
) )
<| <|
text item text item
@ -88,7 +91,11 @@ detailTitleLinkWide : ThemeColor -> String -> Element msg
detailTitleLinkWide colour item = detailTitleLinkWide colour item =
paragraph paragraph
(getHoverColours colour (getHoverColours colour
++ (titleFormat colour ++ [ width fill ]) ++ (titleFormat colour
++ [ width fill
, pointer
]
)
) )
[ text item ] [ text item ]
@ -97,7 +104,11 @@ detailBodyLink : ThemeColor -> String -> Element msg
detailBodyLink colour item = detailBodyLink colour item =
el el
(getHoverColours colour (getHoverColours colour
++ bodyFormat colour ++ (bodyFormat colour
++ [ width fill
, pointer
]
)
) )
<| <|
text item text item

View file

@ -1,6 +1,7 @@
module Pages.Home_ exposing (Model, Msg, page) module Pages.Home_ exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames) import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Cards.Inner.Helpers exposing (bodyFormat, detailBodyLink, detailBodyMaker)
import Config.Helpers.Format import Config.Helpers.Format
exposing exposing
( paragraphFontSize ( paragraphFontSize
@ -13,7 +14,7 @@ import Config.Helpers.Response
, topLevelContainer , topLevelContainer
) )
import Config.Helpers.Viewport exposing (resetViewport) import Config.Helpers.Viewport exposing (resetViewport)
import Config.Style.Colour.Helpers exposing (colourTheme) import Config.Style.Colour.Helpers exposing (ThemeColor(..), colourTheme)
import Config.Style.Glow exposing (glowDeepDarkGrey) import Config.Style.Glow exposing (glowDeepDarkGrey)
import Config.Style.Icons.Icons import Config.Style.Icons.Icons
exposing exposing
@ -187,5 +188,11 @@ homePage device image =
, paragraphFontSize , paragraphFontSize
, centerX , centerX
] ]
[ text "upRootNutrition is an open source project, created by Nick Hiebert, designed to elevate the quality of nutrition science communication in online discourse. By applying more rigorous systems of reasoning, such as formal logic and semantic analysis, upRootNutrition aims to cut through the misinformation and sophistry that are endemic on social media." ] [ text "upRootNutrition is an "
, newTabLink []
{ url = "https://gitlab.com/upRootNutrition/website"
, label = detailBodyLink TextLightOrange "open source project"
}
, text " created by Nick Hiebert, designed to elevate the quality of nutrition science communication in online discourse. By applying more rigorous systems of reasoning, such as formal logic and semantic analysis, upRootNutrition aims to cut through the misinformation and sophistry that are endemic on social media."
]
] ]