diff --git a/frontend/src/Config/Helpers/Articles/Article.elm b/frontend/src/Config/Helpers/Articles/Article.elm index df1f7d9..1d7c8cb 100755 --- a/frontend/src/Config/Helpers/Articles/Article.elm +++ b/frontend/src/Config/Helpers/Articles/Article.elm @@ -2,9 +2,10 @@ module Config.Helpers.Articles.Article exposing (..) import Config.Data.Identity exposing (pageNames) import Config.Helpers.Articles.Types exposing (References) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Markdown exposing (..) import Config.Helpers.Response @@ -44,11 +45,6 @@ import Shared exposing (..) import View exposing (View) -articleMaker : Device -> BlogArticle -> Element msg -articleMaker device article = - cardMaker device article.articleName (contentList article) { description = "", src = "String" } article.articleLink - - contentList : BlogArticle -> List (Element msg) contentList article = [ articleImage article.articleImage diff --git a/frontend/src/Config/Helpers/CardFormat.elm b/frontend/src/Config/Helpers/CardFormat.elm deleted file mode 100755 index 296c4ca..0000000 --- a/frontend/src/Config/Helpers/CardFormat.elm +++ /dev/null @@ -1,240 +0,0 @@ -module Config.Helpers.CardFormat exposing (..) - -import Config.Data.Identity - exposing - ( pageNames - ) -import Config.Helpers.Converters exposing (formatName) -import Config.Helpers.Format - exposing - ( headerFontSizeMedium - , paragraphFontSize - , paragraphSpacing - ) -import Config.Style.Colour exposing (colourTheme) -import Config.Style.Glow - exposing - ( glowDeepDarkGrey - , glowDeepDarkOrange - ) -import Config.Style.Icons.Icons exposing (construction) -import Config.Style.Transitions - exposing - ( hoverCircleButtonDarkOrange - , transitionStyleMedium - , transitionStyleSlow - ) -import Element as E exposing (..) -import Element.Background as B -import Element.Border as D -import Element.Font as F -import Html.Attributes as H -import Route.Path as Path exposing (..) -import Shared - - -cardMaker : Device -> String -> List (Element msg) -> { description : String, src : String } -> String -> Element msg -cardMaker device title content image url = - el - [ width (fill |> minimum 100) - , width (fill |> maximum 875) - , padding 10 - , centerX - ] - <| - if - url - == Path.toString Path.Home_ - || url - == Path.toString Path.Contact - || url - == Path.toString Path.Debate - || url - == Path.toString Path.Debate_Arguments - || url - == Path.toString Path.Debate_Cucklist - || url - == Path.toString Path.Debate_Gibberish - || url - == Path.toString Path.Donate - || url - == Path.toString Path.Blog - || url - == Path.toString Path.Blog_Seedoils - || url - == Path.toString Path.Blog_Huntergatherers - || url - == Path.toString Path.Blog_Sapiendiet - || url - == Path.toString Path.Blog_Nagragoodrich - || url - == Path.toString Path.Blog_Quacksmashing - || url - == Path.toString Path.Blog_Bigfatsurprise - || url - == Path.toString Path.Blog_Everettvegans - || url - == Path.toString Path.Blog_Meatapologetics - || url - == Path.toString Path.Blog_Plantbasedmeta - || url - == Path.toString Path.Blog_Shenanigans - || url - == Path.toString Path.Blog_Sweetdeception - || url - == Path.toString Path.Interviews - || url - == Path.toString Path.Nutridex - || url - == Path.toString Path.Services - || url - == Path.toString Path.Services_Analysis - || url - == Path.toString Path.Services_Coaching - || url - == Path.toString Path.Services_Elm - || url - == Path.toString Path.Services_Nix - || url - == Path.toString Path.Services_Nutrition - then - el - [ E.width fill - , D.width 5 - , D.color colourTheme.backgroundDarkGrey - , D.rounded 32 - , glowDeepDarkGrey - , mouseOver - [ D.color colourTheme.textDarkOrange - , B.color colourTheme.textDarkOrange - , glowDeepDarkOrange - ] - , transitionStyleSlow - ] - <| - link [ width fill ] - { url = url - , label = cardStructure device title content image - } - - else - el - [ E.width fill - , D.width 5 - , D.color colourTheme.backgroundDarkGrey - , D.rounded 32 - , glowDeepDarkGrey - , mouseOver - [ D.color colourTheme.textDarkOrange - , B.color colourTheme.textDarkOrange - , glowDeepDarkOrange - ] - , transitionStyleSlow - ] - <| - newTabLink [] - { url = url - , label = cardStructure device title content image - } - - -cardStructure : Device -> String -> List (Element msg) -> { description : String, src : String } -> Element msg -cardStructure device title content image = - column - [ width fill - ] - [ el - [ headerFontSizeMedium - , F.bold - , F.color colourTheme.textLightGrey - , B.color colourTheme.textDarkOrange - , paddingEach - { top = 6 - , bottom = 3 - , left = 20 - , right = 20 - } - , width fill - , F.center - , D.roundEach - { topLeft = 26 - , topRight = 26 - , bottomRight = 0 - , bottomLeft = 0 - } - ] - <| - paragraph [] [ text title ] - , el - [ E.height fill - , E.width fill - , centerX - , B.color colourTheme.backgroundDarkGrey - , padding 10 - , D.roundEach - { topLeft = 0 - , topRight = 0 - , bottomRight = 26 - , bottomLeft = 26 - } - , spacing 8 - ] - <| - el - [ paddingEach - { top = 0 - , bottom = 0 - , left = 15 - , right = 15 - } - , spacing 8 - , width fill - ] - <| - row - [ width fill ] - [ column - [ spacing 8 - , width fill - ] - content - , el - [ alignRight - , alignTop - , paddingXY 20 20 - ] - <| - el - [ D.rounded 100 - , D.width 5 - , glowDeepDarkGrey - , D.color colourTheme.backgroundDarkGrey - , B.color colourTheme.backgroundDarkGrey - ] - <| - E.image - ([ alignRight - , alignTop - , D.rounded 100 - , clip - ] - ++ (case ( device.class, device.orientation ) of - ( Phone, Portrait ) -> - [ E.width <| px 45 - , E.height <| px 45 - ] - - ( Tablet, Portrait ) -> - [ E.width <| px 45 - , E.height <| px 45 - ] - - _ -> - [ E.width <| px 90 - , E.height <| px 90 - ] - ) - ) - image - ] - ] diff --git a/frontend/src/Config/Helpers/Cardables/Helpers.elm b/frontend/src/Config/Helpers/Cardables/Helpers.elm new file mode 100644 index 0000000..6077850 --- /dev/null +++ b/frontend/src/Config/Helpers/Cardables/Helpers.elm @@ -0,0 +1,307 @@ +module Config.Helpers.Cardables.Helpers exposing (..) + +import Config.Data.Identity + exposing + ( pageNames + ) +import Config.Helpers.Cardables.Types as C exposing (..) +import Config.Helpers.Converters exposing (formatName) +import Config.Helpers.Format + exposing + ( headerFontSizeMedium + , paragraphFontSize + , paragraphSpacing + ) +import Config.Pages.Debate.Arguments.Records.Template exposing (argument) +import Config.Style.Colour exposing (colourTheme) +import Config.Style.Glow + exposing + ( glowDeepDarkGrey + , glowDeepDarkOrange + ) +import Config.Style.Icons.Icons exposing (construction) +import Config.Style.Transitions + exposing + ( hoverCircleButtonDarkOrange + , transitionStyleMedium + , transitionStyleSlow + ) +import Element as E exposing (..) +import Element.Background as B +import Element.Border as D +import Element.Font as F +import Html.Attributes as H +import Route.Path as Path exposing (..) +import Shared + + +cardMaker : Device -> Cardable msg -> List (Element msg) -> Element msg +cardMaker device cardable contents = + let + cardTitleMaker : String -> Element msg + cardTitleMaker title = + el + [ headerFontSizeMedium + , F.bold + , F.color colourTheme.textLightGrey + , B.color colourTheme.textDarkOrange + , paddingEach + { top = 6 + , bottom = 3 + , left = 20 + , right = 20 + } + , width fill + , F.center + , D.roundEach + { topLeft = 26 + , topRight = 26 + , bottomRight = 0 + , bottomLeft = 0 + } + ] + <| + paragraph [] [ text title ] + + cardImageMaker : String -> Element msg + cardImageMaker image = + el + [ alignRight + , alignTop + , paddingXY 20 20 + ] + <| + el + [ D.rounded 100 + , D.width 5 + , glowDeepDarkGrey + , D.color colourTheme.backgroundDarkGrey + , B.color colourTheme.backgroundDarkGrey + ] + <| + E.image + ([ alignRight + , alignTop + , D.rounded 100 + , clip + ] + ++ (case ( device.class, device.orientation ) of + ( Phone, Portrait ) -> + [ E.width <| px 45 + , E.height <| px 45 + ] + + ( Tablet, Portrait ) -> + [ E.width <| px 45 + , E.height <| px 45 + ] + + _ -> + [ E.width <| px 90 + , E.height <| px 90 + ] + ) + ) + { src = image + , description = "" + } + + cardInner : String -> List (Element msg) -> Element msg + cardInner title elements = + column + [ width fill ] + [ cardTitleMaker title + , cardStuff <| + row + [ width fill ] + elements + ] + + cardOuter : Element msg -> Element msg + cardOuter elements = + el + [ width (fill |> minimum 100) + , width (fill |> maximum 875) + , padding 10 + , centerX + ] + <| + el + [ E.width fill + , D.width 5 + , D.color colourTheme.backgroundDarkGrey + , D.rounded 32 + , glowDeepDarkGrey + , mouseOver + [ D.color colourTheme.textDarkOrange + , B.color colourTheme.textDarkOrange + , glowDeepDarkOrange + ] + , transitionStyleSlow + ] + elements + + cardWithImageWithLink : Bool -> String -> String -> String -> List (Element msg) -> Element msg + cardWithImageWithLink linkBool title image url content = + linkChooser + linkBool + (cardInner title + [ cardContentMaker content + , cardImageMaker image + ] + ) + url + + cardWithNoImageWithLink : Bool -> String -> String -> List (Element msg) -> Element msg + cardWithNoImageWithLink linkBool title url content = + linkChooser + linkBool + (cardInner title + [ cardContentMaker content + ] + ) + url + + cardWithImage : String -> String -> List (Element msg) -> Element msg + cardWithImage title image content = + cardOuter <| + cardInner title + [ cardContentMaker content + , cardImageMaker image + ] + + cardWithNoImage : String -> List (Element msg) -> Element msg + cardWithNoImage title content = + cardOuter <| + cardInner title + [ cardContentMaker content + ] + + linkChooser : Bool -> Element msg -> String -> Element msg + linkChooser linkBool element url = + cardOuter <| + (if linkBool then + newTabLink + + else + link + ) + [ width fill ] + { url = url + , label = element + } + in + case cardable of + C.Contact contact -> + el [] <| cardTitleMaker contact.contactName + + C.Cuck cuck -> + cardWithImageWithLink + cuck.isNewTabLink + cuck.cuckName + ("/cucks/" ++ cuck.cuckImage ++ ".png") + cuck.cuckSocial + contents + + C.BlogArticle blogArticle -> + cardWithNoImage + blogArticle.articleName + contents + + C.BlogCard blogArticle -> + cardWithImageWithLink + blogArticle.isNewTabLink + blogArticle.articleName + ("/blog/" ++ blogArticle.articleImage ++ "thumb.png") + blogArticle.articleLink + contents + + C.Argument argument -> + cardWithImageWithLink + argument.isNewTabLink + argument.argumentTitle + ("/arguments/" ++ argument.argumentImage ++ ".png") + argument.proofLink + contents + + C.Gibberish gibberish -> + cardWithImageWithLink + gibberish.isNewTabLink + gibberish.gibberishTitle + ("/gibberish/" ++ gibberish.gibberishImage ++ ".png") + gibberish.gibberishLink + contents + + C.Service service -> + cardWithImageWithLink + service.isNewTabLink + service.serviceName + ("/services/" ++ service.serviceImage ++ ".png") + service.serviceLink + contents + + C.Debate debate -> + cardWithImageWithLink + debate.isNewTabLink + debate.debateTitle + ("/debate/" ++ debate.debateImage ++ ".png") + debate.debateLink + contents + + C.Donate donate -> + cardWithImageWithLink + donate.isNewTabLink + donate.donateName + ("/donate/" ++ donate.donateImage ++ ".png") + donate.donateLink + contents + + C.Interview interview -> + cardWithImage + interview.interviewName + ("/interviews/" ++ interview.interviewImage ++ ".png") + contents + + C.NutriDex nutriDex -> + cardWithNoImage + nutriDex.nutriDexTitle + contents + + +cardContentMaker : List (Element msg) -> Element msg +cardContentMaker content = + column + [ spacing 8 + , width fill + ] + content + + +cardStuff : Element msg -> Element msg +cardStuff content = + el + [ E.height fill + , E.width fill + , centerX + , B.color colourTheme.backgroundDarkGrey + , padding 10 + , D.roundEach + { topLeft = 0 + , topRight = 0 + , bottomRight = 26 + , bottomLeft = 26 + } + , spacing 8 + ] + <| + el + [ paddingEach + { top = 0 + , bottom = 0 + , left = 15 + , right = 15 + } + , spacing 8 + , width fill + ] + content diff --git a/frontend/src/Config/Helpers/Cardables/Types.elm b/frontend/src/Config/Helpers/Cardables/Types.elm new file mode 100644 index 0000000..9485436 --- /dev/null +++ b/frontend/src/Config/Helpers/Cardables/Types.elm @@ -0,0 +1,26 @@ +module Config.Helpers.Cardables.Types exposing (..) + +import Config.Pages.Blog.Types exposing (BlogArticle) +import Config.Pages.Contact.Types exposing (Contact) +import Config.Pages.Debate.Arguments.Types exposing (Argument) +import Config.Pages.Debate.Cuckery.Types exposing (Cuck) +import Config.Pages.Debate.Gibberish.Types exposing (Gibberish) +import Config.Pages.Debate.Types exposing (Debate) +import Config.Pages.Donate.Types exposing (Donate) +import Config.Pages.Interviews.Types exposing (Interview) +import Config.Pages.Products.Types exposing (NutriDex) +import Config.Pages.Services.Types exposing (Service, ServicePage) + + +type Cardable msg + = Contact Contact + | Cuck Cuck + | BlogArticle BlogArticle + | BlogCard BlogArticle + | Argument Argument + | Gibberish Gibberish + | Service (Service msg) + | Debate Debate + | Donate Donate + | Interview Interview + | NutriDex NutriDex diff --git a/frontend/src/Config/Helpers/Headers/Header.elm b/frontend/src/Config/Helpers/Headers/Header.elm index 20b0f9a..fb12519 100755 --- a/frontend/src/Config/Helpers/Headers/Header.elm +++ b/frontend/src/Config/Helpers/Headers/Header.elm @@ -1,6 +1,7 @@ -module Config.Helpers.Headers.Header exposing (headerMaker) +module Config.Helpers.Headers.Header exposing (..) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Pages.Contact.Types exposing (Contact) import Element as E @@ -14,11 +15,23 @@ import Element as E import Shared exposing (..) -headerMaker : Device -> Header -> Element msg -headerMaker device header = - cardMaker device header.headerTitle (contentList header) { description = "", src = "" } "" + +-- headerMaker : Device -> Header -> Element msg +-- headerMaker device header = +-- cardMaker device header.headerTitle (contentList header) { description = "", src = "" } "" contentList : Header -> List (Element msg) contentList header = [ text header.headerBody ] + + +servicesHeader : Header +servicesHeader = + let + name = + "Services" + in + { headerTitle = String.toUpper name + , headerBody = "Bundle any of the services below to receive a $10 discount per hour. For example, two Debate Analysis sessions would cost $140 total, instead of $80/hr. All prices are in CAD." + } diff --git a/frontend/src/Config/Helpers/Headers/Types.elm b/frontend/src/Config/Helpers/Headers/Types.elm index a5db9d7..96e06d6 100755 --- a/frontend/src/Config/Helpers/Headers/Types.elm +++ b/frontend/src/Config/Helpers/Headers/Types.elm @@ -4,6 +4,4 @@ module Config.Helpers.Headers.Types exposing (..) type alias Header = { headerTitle : String , headerBody : String - , hasLink : Bool - , hasImage : Bool } diff --git a/frontend/src/Config/Pages/Blog/Records/BigFatSurprise.elm b/frontend/src/Config/Pages/Blog/Records/BigFatSurprise.elm index 4ba37fe..afdb15e 100755 --- a/frontend/src/Config/Pages/Blog/Records/BigFatSurprise.elm +++ b/frontend/src/Config/Pages/Blog/Records/BigFatSurprise.elm @@ -12,8 +12,6 @@ articleBigFatSurprise = , isNewTabLink = False , hasReferences = True , hasTableOfContents = True - , hasImage = False - , hasLink = False , articleImage = "bigfatsurprise" , articlePublished = "Aug 10, 2014" , articleBody = """ diff --git a/frontend/src/Config/Pages/Blog/Records/EverettVegans.elm b/frontend/src/Config/Pages/Blog/Records/EverettVegans.elm index f391bba..aae5b62 100755 --- a/frontend/src/Config/Pages/Blog/Records/EverettVegans.elm +++ b/frontend/src/Config/Pages/Blog/Records/EverettVegans.elm @@ -11,8 +11,8 @@ articleEverettVegans = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "everettvegans" , articlePublished = "May 1, 2023" diff --git a/frontend/src/Config/Pages/Blog/Records/HunterGatherers.elm b/frontend/src/Config/Pages/Blog/Records/HunterGatherers.elm index 28baae9..7f5078a 100755 --- a/frontend/src/Config/Pages/Blog/Records/HunterGatherers.elm +++ b/frontend/src/Config/Pages/Blog/Records/HunterGatherers.elm @@ -11,8 +11,8 @@ articleHunterGatherers = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "huntergatherers" , articlePublished = "May 14, 2021" diff --git a/frontend/src/Config/Pages/Blog/Records/MeatApologetics.elm b/frontend/src/Config/Pages/Blog/Records/MeatApologetics.elm index 3e6a7b7..182bfc7 100755 --- a/frontend/src/Config/Pages/Blog/Records/MeatApologetics.elm +++ b/frontend/src/Config/Pages/Blog/Records/MeatApologetics.elm @@ -11,8 +11,8 @@ articleMeatApologetics = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "meatapologetics" , articlePublished = "Apr 13, 2022" diff --git a/frontend/src/Config/Pages/Blog/Records/NagraGoodrich.elm b/frontend/src/Config/Pages/Blog/Records/NagraGoodrich.elm index 30ffe07..fe4c08d 100755 --- a/frontend/src/Config/Pages/Blog/Records/NagraGoodrich.elm +++ b/frontend/src/Config/Pages/Blog/Records/NagraGoodrich.elm @@ -11,8 +11,8 @@ articleNagraGoodrich = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = False - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "nagragoodrich" , articlePublished = "May 12, 2022" diff --git a/frontend/src/Config/Pages/Blog/Records/PlantBasedMeta.elm b/frontend/src/Config/Pages/Blog/Records/PlantBasedMeta.elm index f0f8ca6..f41b395 100755 --- a/frontend/src/Config/Pages/Blog/Records/PlantBasedMeta.elm +++ b/frontend/src/Config/Pages/Blog/Records/PlantBasedMeta.elm @@ -11,8 +11,8 @@ articlePlantBasedMeta = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "plantbasedmeta" , articlePublished = "Feb 5, 2021" diff --git a/frontend/src/Config/Pages/Blog/Records/QuackSmashing.elm b/frontend/src/Config/Pages/Blog/Records/QuackSmashing.elm index 216f49e..b1b33e8 100755 --- a/frontend/src/Config/Pages/Blog/Records/QuackSmashing.elm +++ b/frontend/src/Config/Pages/Blog/Records/QuackSmashing.elm @@ -11,8 +11,8 @@ articleQuackSmashing = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "quacksmashing" , articlePublished = "Dec 24, 2022" diff --git a/frontend/src/Config/Pages/Blog/Records/SapienDiet.elm b/frontend/src/Config/Pages/Blog/Records/SapienDiet.elm index e0cc6f1..272f0e1 100755 --- a/frontend/src/Config/Pages/Blog/Records/SapienDiet.elm +++ b/frontend/src/Config/Pages/Blog/Records/SapienDiet.elm @@ -11,8 +11,8 @@ articleSapienDiet = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "sapiendiet" , articlePublished = "Aug 24, 2022" diff --git a/frontend/src/Config/Pages/Blog/Records/SeedOils.elm b/frontend/src/Config/Pages/Blog/Records/SeedOils.elm index 8d9498b..b92afbc 100755 --- a/frontend/src/Config/Pages/Blog/Records/SeedOils.elm +++ b/frontend/src/Config/Pages/Blog/Records/SeedOils.elm @@ -11,8 +11,8 @@ articleSeedOils = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "seedoils" , articlePublished = "Oct 31, 2021" diff --git a/frontend/src/Config/Pages/Blog/Records/Shenangians.elm b/frontend/src/Config/Pages/Blog/Records/Shenangians.elm index 32bb5fe..c23c6cb 100755 --- a/frontend/src/Config/Pages/Blog/Records/Shenangians.elm +++ b/frontend/src/Config/Pages/Blog/Records/Shenangians.elm @@ -11,8 +11,8 @@ articleShenanigans = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = False - , hasImage = False - , hasLink = False + + , hasTableOfContents = True , articleImage = "shenanigans" , articlePublished = "Jun 6, 2024" diff --git a/frontend/src/Config/Pages/Blog/Records/SweetDeception.elm b/frontend/src/Config/Pages/Blog/Records/SweetDeception.elm index a31a807..6af1139 100755 --- a/frontend/src/Config/Pages/Blog/Records/SweetDeception.elm +++ b/frontend/src/Config/Pages/Blog/Records/SweetDeception.elm @@ -12,8 +12,8 @@ articleSweetDeception = , isNewTabLink = False , hasReferences = True , hasTableOfContents = True - , hasImage = False - , hasLink = False + + , articleImage = "sweetdeception" , articlePublished = "Apr 16, 2024" , articleBody = """ diff --git a/frontend/src/Config/Pages/Blog/Records/Template.elm b/frontend/src/Config/Pages/Blog/Records/Template.elm index f05435f..4fd25b9 100755 --- a/frontend/src/Config/Pages/Blog/Records/Template.elm +++ b/frontend/src/Config/Pages/Blog/Records/Template.elm @@ -11,8 +11,6 @@ article = , articleAuthor = "Nick Hiebert" , isNewTabLink = False , hasReferences = True - , hasImage = False - , hasLink = False , hasTableOfContents = True , articleImage = "" , articlePublished = "" diff --git a/frontend/src/Config/Pages/Blog/Types.elm b/frontend/src/Config/Pages/Blog/Types.elm index 733550d..7a384b4 100755 --- a/frontend/src/Config/Pages/Blog/Types.elm +++ b/frontend/src/Config/Pages/Blog/Types.elm @@ -10,8 +10,6 @@ type alias BlogArticle = , articleLink : String , articleAuthor : String , isNewTabLink : Bool - , hasLink : Bool - , hasImage : Bool , hasReferences : Bool , hasTableOfContents : Bool , articlePublished : String diff --git a/frontend/src/Config/Pages/Contact/Types.elm b/frontend/src/Config/Pages/Contact/Types.elm index ec0706c..3aae925 100755 --- a/frontend/src/Config/Pages/Contact/Types.elm +++ b/frontend/src/Config/Pages/Contact/Types.elm @@ -1,12 +1,10 @@ module Config.Pages.Contact.Types exposing (..) - type alias Contact = { contactName : String , contactImage : String , contactLink : String - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , contactLinkLabel : String , contactEntry : List Method } @@ -15,3 +13,5 @@ type alias Contact = type alias Method = { contactInstructions : String } + + diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Abortion.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Abortion.elm index fec7c6a..b239c7f 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Abortion.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Abortion.elm @@ -15,8 +15,7 @@ argumentAbortion = , argumentCertainty = 6 , argumentImage = "abortion" , argumentHashtags = [ PoliticsAbortion, PhilosophySentience, PhilosophyEthics ] - , hasImage = True - , hasLink = False + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "one consents to becoming pregnant" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Agnosticism.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Agnosticism.elm index fc169a2..208e27f 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Agnosticism.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Agnosticism.elm @@ -14,8 +14,9 @@ argumentAgnosticism = , argumentCertainty = 9 , argumentImage = "agnostic" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x,y)" , definiens = "(x) can unpack what evidence would lead them to change their doxastic attitude on (y)" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AgriculturalPredation.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AgriculturalPredation.elm index fb52953..02c668b 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AgriculturalPredation.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AgriculturalPredation.elm @@ -14,8 +14,9 @@ argumentAgriculturalPredation = , argumentCertainty = 10 , argumentImage = "predatoragriculture" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) counts as predation" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AnabolicKeto.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AnabolicKeto.elm index 4c8efb0..2a4e56e 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AnabolicKeto.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AnabolicKeto.elm @@ -14,8 +14,9 @@ argumentAnabolicKeto = , argumentCertainty = 5 , argumentImage = "anabolicketo" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "a higher proportion of amino acids are spent on gluconeogenesis while on ketogenic diets compared to non-ketogenic diets" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AnimalRights.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AnimalRights.elm index 46d5c02..e61d7e5 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AnimalRights.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AnimalRights.elm @@ -14,8 +14,9 @@ argumentAnimalRights = , argumentCertainty = 10 , argumentImage = "animalrights" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has moral worth" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AntagonisticPleiotropy.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AntagonisticPleiotropy.elm index 3454468..19c854d 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AntagonisticPleiotropy.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AntagonisticPleiotropy.elm @@ -14,8 +14,9 @@ argumentAntagonisticPleiotropy = , argumentCertainty = 6 , argumentImage = "antagonisticpleiotropy" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "humans have more genetic adaptations to ancestral foods than novel foods" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AntiRewilding.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AntiRewilding.elm index 965c177..4f28bd9 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AntiRewilding.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AntiRewilding.elm @@ -14,8 +14,9 @@ argumentAntiRewilding = , argumentCertainty = 10 , argumentImage = "rewilding" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has negative rights" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/AntiVandalism.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/AntiVandalism.elm index 16731cc..db13671 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/AntiVandalism.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/AntiVandalism.elm @@ -14,8 +14,9 @@ argumentAntiVandalism = , argumentCertainty = 8 , argumentImage = "antivandalism" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "zoos must spend extra money cleaning graffiti" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/ApoBCVD.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/ApoBCVD.elm index 76fd199..01d068c 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/ApoBCVD.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/ApoBCVD.elm @@ -14,8 +14,9 @@ argumentApoBCVD = , argumentCertainty = 9 , argumentImage = "lipoprotein" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) dose-dependently causes atherosclerosis" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/BoobyTrapPagers.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/BoobyTrapPagers.elm index 2e26960..87f188a 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/BoobyTrapPagers.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/BoobyTrapPagers.elm @@ -14,8 +14,9 @@ argumentBoobyTrapPagers = , argumentCertainty = 4 , argumentImage = "pagers" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is a booby-trap" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/CarbsObesity.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/CarbsObesity.elm index 6daabf0..50efbcd 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/CarbsObesity.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/CarbsObesity.elm @@ -15,8 +15,9 @@ argumentCarbsObesity = , argumentCertainty = 9 , argumentImage = "carbobesity" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "carbs uniquely cause fat accumulation or obesity" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/CateUpfReductio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/CateUpfReductio.elm index 8874496..ce75f63 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/CateUpfReductio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/CateUpfReductio.elm @@ -14,8 +14,9 @@ argumentCateUpfReductio = , argumentCertainty = 10 , argumentImage = "cateupfreductio" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is an ingredient in ultraprocessed foods" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/ColonizingNature.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/ColonizingNature.elm index e5e72ca..3923e93 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/ColonizingNature.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/ColonizingNature.elm @@ -15,8 +15,9 @@ argumentColonizingNature = , argumentCertainty = 10 , argumentImage = "colonizingnature" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "the natural world contains intolerable rights violations" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/CropDeaths.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/CropDeaths.elm index 52ec0b7..a907e71 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/CropDeaths.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/CropDeaths.elm @@ -15,8 +15,9 @@ argumentCropDeaths = , argumentCertainty = 9 , argumentImage = "cropdeaths" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "it is known that cropland leads to more animal death than wildland" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/DairyCowRape.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/DairyCowRape.elm index 59dbcd6..be4a29b 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/DairyCowRape.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/DairyCowRape.elm @@ -14,8 +14,9 @@ argumentDairyCowRape = , argumentCertainty = 10 , argumentImage = "cowrape" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) qualifies as rape" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/DietaryCholesterol.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/DietaryCholesterol.elm index 713d11e..1078adc 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/DietaryCholesterol.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/DietaryCholesterol.elm @@ -14,8 +14,9 @@ argumentDietaryCholesterol = , argumentCertainty = 9 , argumentImage = "dietarycholesterol" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "consuming high amounts of (x) increases LDL" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Dummy.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Dummy.elm index e8ca2d0..ac919d1 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Dummy.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Dummy.elm @@ -15,8 +15,9 @@ argumentDummy = , argumentCertainty = 6 , argumentImage = "" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "" , definiens = "" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/EfilismPatrolSquad.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/EfilismPatrolSquad.elm index 3281eb2..0d42685 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/EfilismPatrolSquad.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/EfilismPatrolSquad.elm @@ -14,8 +14,9 @@ argumentEfilismPatrolSquad = , argumentCertainty = 10 , argumentImage = "efilism" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "humans abstaining from procreation maximally reduces rights violations" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/EpidemiologyCausality.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/EpidemiologyCausality.elm index d513398..b2e899c 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/EpidemiologyCausality.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/EpidemiologyCausality.elm @@ -15,8 +15,9 @@ argumentEpidemiologyCausality = , argumentCertainty = 8 , argumentImage = "epidemiologycausality" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) consistently identifies associations that are later confirmed by randomized controlled trials" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/EthicalSlurs.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/EthicalSlurs.elm index ccddf62..241ccd8 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/EthicalSlurs.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/EthicalSlurs.elm @@ -14,8 +14,9 @@ argumentEthicalSlurs = , argumentCertainty = 7 , argumentImage = "ethicalslurs" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x)'s negative connotations have been neutralised" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/FineTuning.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/FineTuning.elm index 46a4530..21826df 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/FineTuning.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/FineTuning.elm @@ -14,8 +14,9 @@ argumentFineTuning = , argumentCertainty = 10 , argumentImage = "finetuning" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is finely tuned" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/FlatEarthDebunk.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/FlatEarthDebunk.elm index d6afe7c..b49851a 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/FlatEarthDebunk.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/FlatEarthDebunk.elm @@ -14,8 +14,9 @@ argumentFlatEarthDebunk = , argumentCertainty = 10 , argumentImage = "flatearth" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x,y)" , definiens = "(x) is perceived as rotating counter-clockwise from point (y)" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/FructoseNAFLD.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/FructoseNAFLD.elm index a084b22..ef593e0 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/FructoseNAFLD.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/FructoseNAFLD.elm @@ -14,8 +14,9 @@ argumentFructoseNAFLD = , argumentCertainty = 8 , argumentImage = "fructosenafld" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "experimental investigations into fructose overfeeding consistently fail to recreate a fatty liver phenotype in humans" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthPromotingFoods.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthPromotingFoods.elm index 1b55122..1efc749 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthPromotingFoods.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthPromotingFoods.elm @@ -14,8 +14,9 @@ argumentHealthPromotingFoods = , argumentCertainty = 10 , argumentImage = "healthfoods" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "food is defined as material consisting essentially of protein, carbohydrate, and/or fat used in the body of an organism to sustain growth, repair, and vital processes and to furnish energy" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthSeeker.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthSeeker.elm index dc21aed..30f7736 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthSeeker.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthSeeker.elm @@ -15,8 +15,9 @@ argumentHealthSeeker = , argumentCertainty = 10 , argumentImage = "healthseeker" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) favours consuming ancestral foods to the exclusion of (y) because they value reducing disease risk" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyChocolate.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyChocolate.elm index 0ea05ee..a05977d 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyChocolate.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyChocolate.elm @@ -14,8 +14,9 @@ argumentHealthyChocolate = , argumentCertainty = 7 , argumentImage = "chocolate" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyDairy.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyDairy.elm index 640a7f6..c191ffe 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyDairy.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyDairy.elm @@ -14,8 +14,9 @@ argumentHealthyDairy = , argumentCertainty = 7 , argumentImage = "dairy" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) causes atherosclerosis" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFattyFish.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFattyFish.elm index cbe2000..f0f3953 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFattyFish.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFattyFish.elm @@ -14,8 +14,9 @@ argumentHealthyFattyFish = , argumentCertainty = 8 , argumentImage = "fattyfish" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFibre.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFibre.elm index 76d9493..0dac59c 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFibre.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFibre.elm @@ -15,8 +15,9 @@ argumentHealthyFibre = , argumentCertainty = 9 , argumentImage = "fibre" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFood.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFood.elm index 6419db2..8e89d55 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFood.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyFood.elm @@ -15,8 +15,9 @@ argumentHealthyFood = , argumentCertainty = 10 , argumentImage = "foodsubstitution" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x,y,w)" , definiens = "(x) is healthy compared to (w) when in (y)" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyPlantFoods.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyPlantFoods.elm index ff7afa6..e326700 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyPlantFoods.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthyPlantFoods.elm @@ -14,8 +14,9 @@ argumentHealthyPlantFoods = , argumentCertainty = 9 , argumentImage = "plantfoods" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySeedOils.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySeedOils.elm index 4230fd5..8eaf126 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySeedOils.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySeedOils.elm @@ -14,8 +14,9 @@ argumentHealthySeedOils = , argumentCertainty = 9 , argumentImage = "seedoils" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySoy.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySoy.elm index 875b3df..2b53f64 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySoy.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/HealthySoy.elm @@ -14,8 +14,9 @@ argumentHealthySoy = , argumentCertainty = 7 , argumentImage = "soyproducts" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with a reduced risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/ImmortalityReductio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/ImmortalityReductio.elm index d62d461..2bb355f 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/ImmortalityReductio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/ImmortalityReductio.elm @@ -14,8 +14,9 @@ argumentImmortalityReductio = , argumentCertainty = 10 , argumentImage = "immortality" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "humans undergo (x)" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/LuigiTerrorist.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/LuigiTerrorist.elm index 61b3f00..35a4206 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/LuigiTerrorist.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/LuigiTerrorist.elm @@ -14,8 +14,9 @@ argumentLuigiTerrorist = , argumentCertainty = 10 , argumentImage = "luigiterrorist" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) commits violent, criminal acts to further ideological goals stemming from domestic influence" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Malondialdehyde.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Malondialdehyde.elm index 6c2d27f..9a24ecb 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Malondialdehyde.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Malondialdehyde.elm @@ -14,8 +14,9 @@ argumentMalondialdehyde = , argumentCertainty = 6 , argumentImage = "mda" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) increases the risk of atherosclerosis" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/OddOrderPredators.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/OddOrderPredators.elm index ac01143..29aba9c 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/OddOrderPredators.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/OddOrderPredators.elm @@ -14,8 +14,9 @@ argumentOddOrderPredators = , argumentCertainty = 10 , argumentImage = "oddorderpredators" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has negative rights" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Omega3Omega6Ratio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Omega3Omega6Ratio.elm index 0968c3b..91c1165 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Omega3Omega6Ratio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Omega3Omega6Ratio.elm @@ -14,8 +14,9 @@ argumentOmega3Omega6Ratio = , argumentCertainty = 7 , argumentImage = "omega6omega3ratio" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "increases or decreases in disease risk associated with a high or low omega-6/omega-3 ratio are better explained by changes in omega-3 alone" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Ostroveganism.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Ostroveganism.elm index 1f075a1..1d455ca 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Ostroveganism.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Ostroveganism.elm @@ -14,8 +14,9 @@ argumentOstroveganism = , argumentCertainty = 10 , argumentImage = "ostroveganism" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) counts as a brain" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/PlantBasedCVDReversal.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/PlantBasedCVDReversal.elm index 2ccf34f..8c6961f 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/PlantBasedCVDReversal.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/PlantBasedCVDReversal.elm @@ -15,8 +15,9 @@ argumentPlantBasedCVDReversal = , argumentCertainty = 8 , argumentImage = "plantbasedcvd" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "there are established definitions for atherosclerosis reversal in the domain of cardiology" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/PollinationReductio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/PollinationReductio.elm index 7f77385..1e55108 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/PollinationReductio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/PollinationReductio.elm @@ -14,8 +14,9 @@ argumentPollinationReductio = , argumentCertainty = 10 , argumentImage = "pollinationreductio" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is vegan" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/PolyphenolReductio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/PolyphenolReductio.elm index 9b1230b..a36a0f6 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/PolyphenolReductio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/PolyphenolReductio.elm @@ -14,8 +14,9 @@ argumentPolyphenolReductio = , argumentCertainty = 7 , argumentImage = "polyphenolreductio" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is harmful" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/ScratcherPioneers.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/ScratcherPioneers.elm index 680d3f8..4a5f0ff 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/ScratcherPioneers.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/ScratcherPioneers.elm @@ -14,8 +14,9 @@ argumentScratcherPioneers = , argumentCertainty = 10 , argumentImage = "tattooscratchers" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is a scratcher" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/SodiumCVD.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/SodiumCVD.elm index 0522e69..1ae69aa 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/SodiumCVD.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/SodiumCVD.elm @@ -14,8 +14,9 @@ argumentSodiumCVD = , argumentCertainty = 9 , argumentImage = "sodiumcvd" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) consistently raises blood pressure in controlled studies" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/TMAOCausality.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/TMAOCausality.elm index 62f2a81..057f4be 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/TMAOCausality.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/TMAOCausality.elm @@ -15,8 +15,9 @@ argumentTMAOCausality = , argumentCertainty = 9 , argumentImage = "tmaocausality" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) is likely to be causative of heart diseas" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/Template.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/Template.elm index 833bcda..5eb6578 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/Template.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/Template.elm @@ -14,8 +14,9 @@ argument = , argumentCertainty = 1 , argumentImage = "" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "" , definiens = "" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/TransPeople.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/TransPeople.elm index 2d1d86a..8c3e9a0 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/TransPeople.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/TransPeople.elm @@ -14,8 +14,9 @@ argumentTransPeople = , argumentCertainty = 10 , argumentImage = "transpeople" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "Male" , definiens = "the cluster of traits that associate with small, but not large, gametes." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/TruncatedMeta.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/TruncatedMeta.elm index 9f58775..b4e074f 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/TruncatedMeta.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/TruncatedMeta.elm @@ -14,8 +14,9 @@ argumentTruncatedMeta = , argumentCertainty = 7 , argumentImage = "truncatedmetas" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "underpowered studies provide weaker causal estimates than adequately powered studies" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyCoconutOil.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyCoconutOil.elm index 0a17e4b..e2b55d2 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyCoconutOil.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyCoconutOil.elm @@ -14,8 +14,9 @@ argumentUnhealthyCoconutOil = , argumentCertainty = 9 , argumentImage = "coconutoil" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P" , definiens = "a given (x) increases LDL-C at a similar rate to other saturated fat sources" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyProcessedMeat.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyProcessedMeat.elm index 9c93b16..158ec92 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyProcessedMeat.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyProcessedMeat.elm @@ -14,8 +14,9 @@ argumentUnhealthyProcessedMeat = , argumentCertainty = 8 , argumentImage = "processedmeat" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with an increased risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyRedMeat.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyRedMeat.elm index cf6f61c..e8863ed 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyRedMeat.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthyRedMeat.elm @@ -14,8 +14,9 @@ argumentUnhealthyRedMeat = , argumentCertainty = 7 , argumentImage = "redmeat" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with an increased risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthySaturatedFat.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthySaturatedFat.elm index 3c474ca..5f81ccb 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthySaturatedFat.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/UnhealthySaturatedFat.elm @@ -14,8 +14,9 @@ argumentUnhealthySaturatedFat = , argumentCertainty = 9 , argumentImage = "saturatedfat" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "(x) has a strong tendency to associate with an increased risk of morbidity and/or mortality after adjusting and/or controlling for relevant variables." diff --git a/frontend/src/Config/Pages/Debate/Arguments/Records/VeganSocietyReductio.elm b/frontend/src/Config/Pages/Debate/Arguments/Records/VeganSocietyReductio.elm index 40957c1..c900e20 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Records/VeganSocietyReductio.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Records/VeganSocietyReductio.elm @@ -14,8 +14,9 @@ argumentVeganSocietyReductio = , argumentCertainty = 10 , argumentImage = "vegansociety" , argumentHashtags = [] - , hasImage = True - , hasLink = False + + + , isNewTabLink = False , definitionTable = [ { definiendum = "P(x)" , definiens = "it is vegan to do (x)" diff --git a/frontend/src/Config/Pages/Debate/Arguments/Types.elm b/frontend/src/Config/Pages/Debate/Arguments/Types.elm index 559fef7..42ae60b 100755 --- a/frontend/src/Config/Pages/Debate/Arguments/Types.elm +++ b/frontend/src/Config/Pages/Debate/Arguments/Types.elm @@ -13,8 +13,7 @@ type alias Argument = , argumentCertainty : Int , argumentImage : String , argumentHashtags : List Hashtags - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , argumentFormalization : List ArgumentEntry } diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AdamSinger.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AdamSinger.elm index e7c066f..c71c518 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AdamSinger.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AdamSinger.elm @@ -14,8 +14,7 @@ cuckAdamSinger = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/AdamSinger" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1566491269194719232?s=20" , dodgeDescription = VagueGesture diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AmberOHearn.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AmberOHearn.elm index 59c5f82..be898be 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AmberOHearn.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AmberOHearn.elm @@ -14,8 +14,7 @@ cuckAmberOHearn = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/KetoCarnivore" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/FusionProgGuy/status/1413888976281169922?s=20" , dodgeDescription = VagueGesture diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AnnChilders.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AnnChilders.elm index 52f91a6..7415fad 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AnnChilders.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AnnChilders.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.AnnChilders exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckAnnChilders : Cuck @@ -14,13 +14,12 @@ cuckAnnChilders = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/AnnChildersMD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1447245484356108292?s=20" , dodgeDescription = RanAway , dodgeProposition = "Diets humans thrived on in the wild, sans dentists and doctors, are correct." - , dodgeReceipts = [{receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Agnostic , dodgeNicksDoxasticReason = VagueProp diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AnthonyGustin.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AnthonyGustin.elm index f82a207..c852773 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AnthonyGustin.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AnthonyGustin.elm @@ -14,13 +14,12 @@ cuckAnthonyGustin = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/dranthonygustin" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1482502242632552449?s=20" , dodgeDescription = GhostedMe , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"} ] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AshwaniGarg.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AshwaniGarg.elm index 1ec648a..0df4966 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AshwaniGarg.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AshwaniGarg.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.AshwaniGarg exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckAshwaniGarg : Cuck @@ -14,13 +14,12 @@ cuckAshwaniGarg = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/agargmd" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1443328350982967303?s=20" , dodgeDescription = NoReply , dodgeProposition = "Representing the protein content of beans by dry weight is misleading." - , dodgeReceipts = [{receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason "It's unclear why we should care about the protein content of a dry food item if that food item is inedible in its dry state" diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/AustinHerbert.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/AustinHerbert.elm index 4f08ba5..09ea97a 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/AustinHerbert.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/AustinHerbert.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.AustinHerbert exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckAustinHerbert : Cuck @@ -14,13 +14,12 @@ cuckAustinHerbert = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/_AustinHerbert" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1663698981833277440" , dodgeDescription = NoReply , dodgeProposition = "Seed oils make you fat and kill your body." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BartKay.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BartKay.elm index 4d7f862..d7bf0c5 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BartKay.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BartKay.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BartKay exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBartKay : Cuck @@ -14,13 +14,12 @@ cuckBartKay = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/Bart_WT_Kay" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://www.youtube.com/watch?v=M7vTJ02xxrw" , dodgeDescription = RanAway , dodgeProposition = "A 100% Carnivore diet is the appropriate and best health choice for all people." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propEmpiricalClaimDisbelief diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BenBikman.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BenBikman.elm index 0fc6f00..524d5bd 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BenBikman.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BenBikman.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BenBikman exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBenBikman : Cuck @@ -14,13 +14,12 @@ cuckBenBikman = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/BenBikmanPhD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1587547250074746880?s=19" , dodgeDescription = NoReply , dodgeProposition = "The diet-heart hypothesis is false." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSaturatedFatReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BennyMalone.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BennyMalone.elm index 3fea6c2..f171bb0 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BennyMalone.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BennyMalone.elm @@ -14,13 +14,12 @@ cuckBennyMalone = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/bennymaloneUK" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1569046576609300489" , dodgeDescription = RanAway , dodgeProposition = "Eating oysters is compatible with veganism." - , dodgeReceipts = [ {receipt = "receipt1"} ] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason "Bivalves are not likely to be sentient, and extending them the precautionary principle has hilarious entails." diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCampbell.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCampbell.elm index 3af89c2..13c72a5 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCampbell.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCampbell.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BradCampbell exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBradCampbell : Cuck @@ -14,13 +14,12 @@ cuckBradCampbell = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/DrBradCampbell" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1530933999610171392?s=20" , dodgeDescription = NoReply , dodgeProposition = "Canola oil kills you slowly." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCohn.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCohn.elm index 6c3e467..33e824c 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCohn.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradCohn.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BradCohn exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBradCohn : Cuck @@ -14,13 +14,12 @@ cuckBradCohn = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/BradCohn" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1687535030862831616" , dodgeDescription = NoReply , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradMarshall.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradMarshall.elm index 96badbb..2463813 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BradMarshall.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BradMarshall.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BradMarshall exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBradMarshall : Cuck @@ -14,13 +14,12 @@ cuckBradMarshall = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/fire_bottle" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "" , dodgeDescription = InTooDeep , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BretWeinstein.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BretWeinstein.elm index c1cd817..dd4d36e 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BretWeinstein.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BretWeinstein.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BretWeinstein exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBretWeinstein : Cuck @@ -14,13 +14,12 @@ cuckBretWeinstein = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/BretWeinstein" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1858356347332374597" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are dangerous." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -28,7 +27,7 @@ cuckBretWeinstein = , { dodgeLink = "https://x.com/TheNutrivore/status/1858745910701777229" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are dangerous." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -36,7 +35,7 @@ cuckBretWeinstein = , { dodgeLink = "https://x.com/TheNutrivore/status/1858746414882263256" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are dangerous." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/BrianKerley.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/BrianKerley.elm index 93aed47..47e3fb4 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/BrianKerley.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/BrianKerley.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.BrianKerley exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckBrianKerley : Cuck @@ -14,13 +14,12 @@ cuckBrianKerley = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/SeedOilDsrspctr" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1483889771134926849?s=20" , dodgeDescription = NoReply , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -28,7 +27,7 @@ cuckBrianKerley = , { dodgeLink = "https://x.com/TheNutrivore/status/1783200352646619227" , dodgeDescription = NoReply , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/CarnivoreAurelius.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/CarnivoreAurelius.elm index 97b1f25..fbfdf68 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/CarnivoreAurelius.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/CarnivoreAurelius.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.CarnivoreAurelius exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckCarnivoreAurelius : Cuck @@ -14,13 +14,12 @@ cuckCarnivoreAurelius = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/AlpacaAurelius" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1538272143061815299?s=20" , dodgeDescription = NoReply , dodgeProposition = "Vegans kill 100x more animals." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Agnostic , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propEmpiricalClaim diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/CateShanahan.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/CateShanahan.elm index 4f1ab8d..5e91cda 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/CateShanahan.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/CateShanahan.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.CateShanahan exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckCateShanahan : Cuck @@ -14,13 +14,12 @@ cuckCateShanahan = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/drcateshanahan" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1266438463634632709?s=20" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are pro-inflammatory." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonInflammation @@ -28,7 +27,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/The_Nutrivore/status/1479497980570857474?s=20" , dodgeDescription = NoReply , dodgeProposition = "Those who defend seed oils are just regurgitating the garbage that the AHA pumps out." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason "I defend seed oils and I've never even read the AHA's material on the subject." @@ -36,7 +35,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/The_Nutrivore/status/1487215337116508162?s=20" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are toxic." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -44,7 +43,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/drcateshanahan/status/1516904406805057537?s=20" , dodgeDescription = NoReply , dodgeProposition = "Current levels of seed oil consumption are the main driver of the obesity and chronic disease." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -52,7 +51,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/The_Nutrivore/status/1537544882532716544?s=20" , dodgeDescription = NoReply , dodgeProposition = "Nick is just following the AHA marching orders." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason "I've never even read the AHA's recommendations on anything." @@ -60,7 +59,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/TheNutrivore/status/1778616438116483102" , dodgeDescription = RanAway , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -68,7 +67,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/TheNutrivore/status/1779185488521310601" , dodgeDescription = OutrightNo , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -76,7 +75,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/TheNutrivore/status/1778616438116483102" , dodgeDescription = KillScreen , dodgeProposition = commonProps.propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Belief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason @@ -84,7 +83,7 @@ cuckCateShanahan = , { dodgeLink = "https://x.com/TheNutrivore/status/1798766450255253987" , dodgeDescription = KillScreen , dodgeProposition = "Current levels of seed oil consumption are the main driver of heart disease." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonCVD diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ChrisBoettcher.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ChrisBoettcher.elm index 1bf0d3c..7a05b8e 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ChrisBoettcher.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ChrisBoettcher.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.ChrisBoettcher exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckChrisBoettcher : Cuck @@ -14,13 +14,12 @@ cuckChrisBoettcher = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/chrisboettcher9" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/MeggGawat/status/1669691841682210822" , dodgeDescription = NoReply , dodgeProposition = "Seed oils are making you fat, depressed, and sick." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ClaraAboel.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ClaraAboel.elm index c12e36c..7258325 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ClaraAboel.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ClaraAboel.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.ClaraAboel exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckClaraAboel : Cuck @@ -14,13 +14,12 @@ cuckClaraAboel = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/AIWellnessCoach" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1727510906655969736" , dodgeDescription = NoReply , dodgeProposition = "Polyunsaturated fatty acids are known to initiate cancer." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonCancer diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/CliffHarvey.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/CliffHarvey.elm index df0f490..82323a7 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/CliffHarvey.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/CliffHarvey.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.CliffHarvey exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckCliffHarvey : Cuck @@ -14,13 +14,12 @@ cuckCliffHarvey = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/CarbAppropriate" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/CarbAppropriate/status/1372281626206507010?s=20" , dodgeDescription = NoReply , dodgeProposition = "Saturated fat in the diet does not independently increase the risk of mortality." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSaturatedFatReason @@ -28,7 +27,7 @@ cuckCliffHarvey = , { dodgeLink = "https://x.com/The_Nutrivore/status/1500650543886204929?s=20" , dodgeDescription = NoReply , dodgeProposition = "Saturated fat in the diet does not independently increase the risk of mortality." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSaturatedFatReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/DaveFeldman.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/DaveFeldman.elm index cdf94f3..4a6aba3 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/DaveFeldman.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/DaveFeldman.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.DaveFeldman exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckDaveFeldman : Cuck @@ -14,13 +14,12 @@ cuckDaveFeldman = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/realDaveFeldman" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1306625219440730118?s=20" , dodgeDescription = NoReply , dodgeProposition = noProposition - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Nothing , dodgeNicksDoxasticReason = NoProp diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidDiamond.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidDiamond.elm index 6df3234..5b71962 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidDiamond.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidDiamond.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.DavidDiamond exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckDavidDiamond : Cuck @@ -18,13 +18,12 @@ cuckDavidDiamond = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/LDLSkeptic" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/LDLSkeptic/status/1583471298306375681?s=20" , dodgeDescription = OutrightNo , dodgeProposition = statinProp - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propLDLCausality @@ -32,7 +31,7 @@ cuckDavidDiamond = , { dodgeLink = "https://x.com/LDLSkeptic/status/1583481964840902656?s=20" , dodgeDescription = KillScreen , dodgeProposition = statinProp - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propLDLCausality diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidGornoski.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidGornoski.elm index bcb3be3..c41d83d 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidGornoski.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/DavidGornoski.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.DavidGornoski exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckDavidGornoski : Cuck @@ -14,13 +14,12 @@ cuckDavidGornoski = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/DavidGornoski" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1525474063044550657?s=20" , dodgeDescription = OutrightNo , dodgeProposition = "Polyunsaturated fatty acids cause obesity." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonObesity diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/DianaRodgers.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/DianaRodgers.elm index d7659f0..4838c38 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/DianaRodgers.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/DianaRodgers.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.DianaRodgers exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckDianaRodgers : Cuck @@ -14,13 +14,12 @@ cuckDianaRodgers = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/sustainabledish" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1365857401786814465?s=20" , dodgeDescription = InTooDeep , dodgeProposition = "Saturated fat doesn't increase the risk of coronary heart disease." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSaturatedFatReason diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/EdwardGoeke.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/EdwardGoeke.elm index c7e7d88..a94421c 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/EdwardGoeke.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/EdwardGoeke.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.EdwardGoeke exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckEdwardGoeke : Cuck @@ -17,13 +17,12 @@ cuckEdwardGoeke = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/GoekeEddie" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1773421625150746784?s=20" , dodgeDescription = NoReply , dodgeProposition = propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonInflammation @@ -31,7 +30,7 @@ cuckEdwardGoeke = , { dodgeLink = "https://x.com/TheNutrivore/status/1774154640403423359?s=20" , dodgeDescription = NoReply , dodgeProposition = propSeedOils - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Disbelief , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReasonInflammation diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ElieJarrouge.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ElieJarrouge.elm index 35d046b..17f031d 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ElieJarrouge.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ElieJarrouge.elm @@ -1,7 +1,7 @@ module Config.Pages.Debate.Cuckery.Records.ElieJarrouge exposing (..) -import Config.Pages.Debate.Cuckery.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Debate.Cuckery.Types exposing (..) cuckElieJarrouge : Cuck @@ -14,13 +14,12 @@ cuckElieJarrouge = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/ElieJarrougeMD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1506845469980315648?s=20" , dodgeDescription = NoReply , dodgeProposition = "Sugar, refined carbs, and seed oils are poison." - , dodgeReceipts = [ {receipt = "receipt1"}] + , dodgeReceipts = [ { receipt = "receipt1" } ] , dodgeFallacy = Just (SpecificFallacy "") , dodgeNicksDoxasticState = Just Agnostic , dodgeNicksDoxasticReason = VagueProp diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryBrecka.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryBrecka.elm index 39ae186..7b2d78f 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryBrecka.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryBrecka.elm @@ -14,8 +14,7 @@ cuckGaryBrecka = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/garybrecka1" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1726664526316372125" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryFettke.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryFettke.elm index 815f158..c21b245 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryFettke.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryFettke.elm @@ -14,8 +14,7 @@ cuckGaryFettke = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/FructoseNo" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1460983496524980224" , dodgeDescription = GhostedMe diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryTaubes.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryTaubes.elm index e299fae..7850574 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryTaubes.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/GaryTaubes.elm @@ -14,8 +14,7 @@ cuckGaryTaubes = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/garytaubes" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/garytaubes/status/1595180467552018432?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/GeorgeMartin.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/GeorgeMartin.elm index 10da6ee..f1de62c 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/GeorgeMartin.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/GeorgeMartin.elm @@ -14,8 +14,7 @@ cuckGeorgeMartin = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/CarnismDebunked" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1815098730141651021" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/GuyAustin.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/GuyAustin.elm index 8dee8f6..032afdc 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/GuyAustin.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/GuyAustin.elm @@ -14,8 +14,7 @@ cuckGuyAustin = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/GuyNAustin" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1538607434176020480" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/IvorCummins.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/IvorCummins.elm index 2d661a1..2364bd4 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/IvorCummins.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/IvorCummins.elm @@ -17,8 +17,7 @@ cuckIvorCummins = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/FatEmperor" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1268600451693494273?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/JakeMey.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/JakeMey.elm index 51bfd7e..5c6fb1f 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/JakeMey.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/JakeMey.elm @@ -17,8 +17,7 @@ cuckJakeMey = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/CakeNutrition" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1490009495581298690?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/JamesDiNicolantonio.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/JamesDiNicolantonio.elm index a104571..a659a84 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/JamesDiNicolantonio.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/JamesDiNicolantonio.elm @@ -14,8 +14,7 @@ cuckJamesDiNicolantonio = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/drjamesdinic" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1460788569388171268?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/JosephEverett.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/JosephEverett.elm index 239aa48..a3f6a88 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/JosephEverett.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/JosephEverett.elm @@ -18,8 +18,7 @@ cuckJosephEverett = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/JEverettLearned" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1535334822825971712?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/JustinMares.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/JustinMares.elm index cc26c53..75ca5f6 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/JustinMares.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/JustinMares.elm @@ -14,8 +14,7 @@ cuckJustinMares = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/jwmares" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1329266554089869312?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/KaitMalthaner.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/KaitMalthaner.elm index b961766..a2ad51c 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/KaitMalthaner.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/KaitMalthaner.elm @@ -14,8 +14,7 @@ cuckKaitMalthaner = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/healthcoachkait" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1503258756687306753?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/KemMinnick.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/KemMinnick.elm index 7518143..efc9e72 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/KemMinnick.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/KemMinnick.elm @@ -22,8 +22,7 @@ cuckKemMinnick = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/kemminnick" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/kemminnick/status/1469336100300726273?s=20" , dodgeDescription = GhostedMe diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/KenBerry.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/KenBerry.elm index 1396c8d..8f75bd6 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/KenBerry.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/KenBerry.elm @@ -18,8 +18,7 @@ cuckKenBerry = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/KenDBerryMD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1366524889067368449?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/KevinStock.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/KevinStock.elm index 3403435..7ba5db1 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/KevinStock.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/KevinStock.elm @@ -14,8 +14,7 @@ cuckKevinStock = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/kevinstock12" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1530140722225102848?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/KyleMamounis.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/KyleMamounis.elm index 4630593..b19688f 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/KyleMamounis.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/KyleMamounis.elm @@ -14,8 +14,7 @@ cuckKyleMamounis = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/Nutricrinology" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1389259133044477953?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MarkSisson.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MarkSisson.elm index 119efe6..66e4c55 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MarkSisson.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MarkSisson.elm @@ -14,8 +14,7 @@ cuckMarkSisson = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/Mark_Sisson" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1488360227141419009?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MartyKendall.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MartyKendall.elm index db4cacd..53b320e 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MartyKendall.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MartyKendall.elm @@ -14,8 +14,7 @@ cuckMartyKendall = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/martykendall2" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://twitter.com/The_Nutrivore/status/1310548994804809729" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MaxLugavere.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MaxLugavere.elm index 68dc5dc..7d27cfe 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MaxLugavere.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MaxLugavere.elm @@ -18,8 +18,7 @@ cuckMaxLugavere = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/maxlugavere" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/maxlugavere/status/1517683567249149953?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelKummer.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelKummer.elm index 9e2164f..2e38eee 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelKummer.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelKummer.elm @@ -14,8 +14,7 @@ cuckMichaelKummer = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/mkummer82" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/mkummer82/status/1465755847917715464?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelManderville.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelManderville.elm index 0603088..311de23 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelManderville.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MichaelManderville.elm @@ -14,8 +14,7 @@ cuckMichaelManderville = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/MikeManderville" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1503036463306489856?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeMutzel.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeMutzel.elm index adc3836..ee7f10d 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeMutzel.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeMutzel.elm @@ -14,8 +14,7 @@ cuckMikeMutzel = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/MikeMutzel" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1414457776982552576?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeSweeney.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeSweeney.elm index 2ed48b1..d3d7211 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeSweeney.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/MikeSweeney.elm @@ -14,8 +14,7 @@ cuckMikeSweeney = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/thelowcarb_rd" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1746962254052962552" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/NickEggleton.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/NickEggleton.elm index 376da03..a071442 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/NickEggleton.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/NickEggleton.elm @@ -14,8 +14,7 @@ cuckNickEggleton = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/NickEggleton" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1266626885703720961?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/NinaTeicholz.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/NinaTeicholz.elm index f716484..6887c2a 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/NinaTeicholz.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/NinaTeicholz.elm @@ -14,8 +14,7 @@ cuckNinaTeicholz = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/bigfatsurprise" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1556510529014882305?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/NorstrongChris.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/NorstrongChris.elm index 5969531..2129002 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/NorstrongChris.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/NorstrongChris.elm @@ -14,8 +14,7 @@ cuckNorstrongChris = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/northstrongwill" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/NorstrongHealth/status/1416939281973530626?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulMason.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulMason.elm index 2e9e41d..b6cd72f 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulMason.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulMason.elm @@ -14,8 +14,7 @@ cuckPaulMason = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/DrPaulMason" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/Tom_Babington1/status/1361644276866830337?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulSaladino.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulSaladino.elm index 9cccb6d..bc4355c 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulSaladino.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/PaulSaladino.elm @@ -18,8 +18,7 @@ cuckPaulSaladino = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/paulsaladinomd" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1275912849999695872?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilipOvadia.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilipOvadia.elm index 475ed62..aac3dff 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilipOvadia.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilipOvadia.elm @@ -14,8 +14,7 @@ cuckPhilipOvadia = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/ifixhearts" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1557791520324890624?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilippeStephenson.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilippeStephenson.elm index 888e5a4..8b6e110 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilippeStephenson.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/PhilippeStephenson.elm @@ -14,8 +14,7 @@ cuckPhilippeStephenson = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/TotalCytopath" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1779587012120715433" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/RalphNapolitano.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/RalphNapolitano.elm index bd9d653..df386c7 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/RalphNapolitano.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/RalphNapolitano.elm @@ -14,8 +14,7 @@ cuckRalphNapolitano = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/DrRalphNap" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1462794580848300034?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/RaphaelSirtoli.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/RaphaelSirtoli.elm index 8a33216..1d9ed22 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/RaphaelSirtoli.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/RaphaelSirtoli.elm @@ -14,8 +14,7 @@ cuckRaphaelSirtoli = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/raphaels7" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/raphaels7/status/1475767357188579329?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/RobMeijer.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/RobMeijer.elm index 1b14558..300ab22 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/RobMeijer.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/RobMeijer.elm @@ -14,8 +14,7 @@ cuckRobMeijer = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/EngineerDiet" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1435850829051793408?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/RobbWolf.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/RobbWolf.elm index f69cba9..75c99a5 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/RobbWolf.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/RobbWolf.elm @@ -14,8 +14,7 @@ cuckRobbWolf = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/robbwolf" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1601624559647875072?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/SebastianRamirez.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/SebastianRamirez.elm index 743aea0..c883911 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/SebastianRamirez.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/SebastianRamirez.elm @@ -14,8 +14,7 @@ cuckSebastianRamirez = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/JS_RamirezMD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/JS_RamirezMD/status/1859378109306278377" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ShawnBaker.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ShawnBaker.elm index bbf0436..be8f51a 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ShawnBaker.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ShawnBaker.elm @@ -14,8 +14,7 @@ cuckShawnBaker = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/SBakerMD" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1868037979807346738" , dodgeDescription = GhostedMe diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/SimonGoddek.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/SimonGoddek.elm index 9d503f1..eab38bd 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/SimonGoddek.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/SimonGoddek.elm @@ -18,8 +18,7 @@ cuckSimonGoddek = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/goddeketal" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1795673579931255233" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/Template.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/Template.elm index e020def..237f57a 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/Template.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/Template.elm @@ -14,8 +14,7 @@ cuck = { cuckImage = formatName name , cuckName = name , cuckSocial = "" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/TravisStatham.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/TravisStatham.elm index c9286c4..b5b06ce 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/TravisStatham.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/TravisStatham.elm @@ -18,8 +18,7 @@ cuckTravisStatham = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/Travis_Statham" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1461428023207489542?s=20" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/TristanHaggard.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/TristanHaggard.elm index ee4feda..3bd9f3e 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/TristanHaggard.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/TristanHaggard.elm @@ -14,8 +14,7 @@ cuckTristanHaggard = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/Trxstxn4" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1513596227052527621?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/TroKalayjian.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/TroKalayjian.elm index e93370d..c183dca 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/TroKalayjian.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/TroKalayjian.elm @@ -14,8 +14,7 @@ cuckTroKalayjian = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/DoctorTro" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1261351818430255104?s=20" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/TuckerGoodrich.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/TuckerGoodrich.elm index 8a6194c..147e9a1 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/TuckerGoodrich.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/TuckerGoodrich.elm @@ -14,8 +14,7 @@ cuckTuckerGoodrich = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/TuckerGoodrich" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1276694117494358017?s=19" , dodgeDescription = RanAway diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ZoeHarcombe.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ZoeHarcombe.elm index c55b548..fa346e0 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ZoeHarcombe.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ZoeHarcombe.elm @@ -14,8 +14,7 @@ cuckZoeHarcombe = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/zoeharcombe" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/The_Nutrivore/status/1418263706178310149" , dodgeDescription = NoReply diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Records/ZsofiaClemens.elm b/frontend/src/Config/Pages/Debate/Cuckery/Records/ZsofiaClemens.elm index 4c1b27c..7e37260 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Records/ZsofiaClemens.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Records/ZsofiaClemens.elm @@ -14,8 +14,7 @@ cuckZsofiaClemens = { cuckImage = formatName name , cuckName = name , cuckSocial = "https://x.com/ClemensZsofia" - , hasLink = True - , hasImage = True + , isNewTabLink = True , cuckDodges = [ { dodgeLink = "https://x.com/TheNutrivore/status/1528377198180290561?s=20" , dodgeDescription = OutrightNo diff --git a/frontend/src/Config/Pages/Debate/Cuckery/Types.elm b/frontend/src/Config/Pages/Debate/Cuckery/Types.elm index 51863be..ca8be44 100755 --- a/frontend/src/Config/Pages/Debate/Cuckery/Types.elm +++ b/frontend/src/Config/Pages/Debate/Cuckery/Types.elm @@ -7,8 +7,7 @@ type alias Cuck = { cuckImage : String , cuckName : String , cuckSocial : String - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , cuckDodges : List Dodge } diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/Epistemology.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/Epistemology.elm index 3c69b14..eb93eba 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/Epistemology.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/Epistemology.elm @@ -12,10 +12,9 @@ epistemologyGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Epistemology" , gibberishDescription = "Epistemology is a branch of philosophy that investigates the nature, origin, and limits of knowledge. It addresses fundamental questions about what knowledge is, how it is acquired, and the criteria for its validity. By exploring concepts such as belief, truth, and justification, epistemology seeks to understand how humans comprehend and interpret reality." + , isNewTabLink = True , gibberishTerms = [ { term = "Abductive Arguments" , strength = 3 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/Metaphysics.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/Metaphysics.elm index b6f9b57..5e25a97 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/Metaphysics.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/Metaphysics.elm @@ -12,10 +12,9 @@ metaphysicsGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Metaphysics" , gibberishDescription = "Metaphysics is a branch of philosophy that explores the fundamental nature of reality, including concepts such as existence, being, causality, and the nature of objects and their properties. It seeks to answer profound questions about what exists and the structure of the world beyond empirical observation. Traditionally, metaphysics includes subfields like ontology, which specifically studies the nature of being." + , isNewTabLink = True , gibberishTerms = [ { term = "Correspondence Theory of Truth" , strength = 10 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/Normativity.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/Normativity.elm index 6611ae2..0591388 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/Normativity.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/Normativity.elm @@ -12,10 +12,9 @@ normativityGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Normativity" , gibberishDescription = "Normativity refers to the phenomenon in human societies where certain actions or outcomes are designated as good, desirable, or permissible, while others are viewed as bad or undesirable. It encompasses the rules, standards, or norms that guide behaviors and judgments within a community, influencing what individuals ought to think and value. In philosophical contexts, normativity is often linked to moral and ethical considerations, shaping discussions about what is right or wrong." + , isNewTabLink = True , gibberishTerms = [ { term = "Externalist Value" , strength = 0 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/Ontology.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/Ontology.elm index feb09a7..9d59df2 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/Ontology.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/Ontology.elm @@ -12,10 +12,9 @@ ontologyGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Ontology" , gibberishDescription = "Ontology is the philosophical study of being and existence, focusing on the nature and categories of entities. It explores fundamental questions about what it means to exist and the relationships between different kinds of beings. Traditionally considered a branch of metaphysics, ontology also examines the properties and structures that define reality" + , isNewTabLink = True , gibberishTerms = [ { term = "Libertarian Free Will" , strength = 0 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfLanguage.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfLanguage.elm index 00a5a8e..a044fbd 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfLanguage.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfLanguage.elm @@ -12,10 +12,9 @@ philOfLanguageGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Philosophy_of_language" , gibberishDescription = "The philosophy of language is a branch of philosophy that investigates the nature, origins, and usage of language, focusing on how language relates to meaning, thought, and reality. It explores fundamental questions about the nature of words and sentences, how they convey complex meanings, and the relationship between language users and the world. Key topics include meaning, reference, intentionality, and the structure of language itself." + , isNewTabLink = True , gibberishTerms = [ { term = "Direct Reference" , strength = 2 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfMind.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfMind.elm index cf820ce..9b32bb1 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfMind.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/PhilOfMind.elm @@ -12,10 +12,9 @@ philOfMindGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Philosophy_of_mind" , gibberishDescription = "The philosophy of mind is a branch of philosophy that explores the nature of the mind, consciousness, and mental phenomena, particularly their relationship to the body and the physical world. It addresses fundamental questions about how mental states such as thoughts, feelings, and perceptions relate to brain processes and the external environment. Key topics include consciousness, intentionality, and the mind-body problem, which examines how mental and physical states interact." + , isNewTabLink = True , gibberishTerms = [ { term = "Epiphenomenalism" , strength = 5 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Records/Theology.elm b/frontend/src/Config/Pages/Debate/Gibberish/Records/Theology.elm index 74c2128..a334766 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Records/Theology.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Records/Theology.elm @@ -12,10 +12,9 @@ theologyGibberish = in { gibberishTitle = name , gibberishImage = formatName name - , hasImage = True - , hasLink = False , gibberishLink = "https://en.wikipedia.org/wiki/Theology" , gibberishDescription = "Theology is the study of religious beliefs and practices, focusing on the nature of divinity and the relationship between the divine and humanity. It encompasses various disciplines, including systematic theology, biblical theology, and practical theology, each exploring different aspects of faith and spirituality. Essentially, theology seeks to provide a coherent understanding of God and religious experience, guiding adherents in their beliefs and practices." + , isNewTabLink = True , gibberishTerms = [ { term = "Divine Simplicity" , strength = 3 diff --git a/frontend/src/Config/Pages/Debate/Gibberish/Types.elm b/frontend/src/Config/Pages/Debate/Gibberish/Types.elm index db3643f..53a28fa 100755 --- a/frontend/src/Config/Pages/Debate/Gibberish/Types.elm +++ b/frontend/src/Config/Pages/Debate/Gibberish/Types.elm @@ -7,8 +7,7 @@ type alias Gibberish = { gibberishTitle : String , gibberishImage : String , gibberishLink : String - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , gibberishDescription : String , gibberishTerms : List Terms } diff --git a/frontend/src/Config/Pages/Debate/Types.elm b/frontend/src/Config/Pages/Debate/Types.elm index b3cf180..392ede8 100755 --- a/frontend/src/Config/Pages/Debate/Types.elm +++ b/frontend/src/Config/Pages/Debate/Types.elm @@ -5,9 +5,7 @@ type alias Debate = { debateTitle : String , debateLink : String , debateImage : String - , debateCount : Int , isNewTabLink : Bool - , hasLink : Bool - , hasImage : Bool + , debateCount : Int , debateDescription : String } diff --git a/frontend/src/Config/Pages/Donate/Records/Cardano.elm b/frontend/src/Config/Pages/Donate/Records/Cardano.elm index 13607fe..a0469e9 100755 --- a/frontend/src/Config/Pages/Donate/Records/Cardano.elm +++ b/frontend/src/Config/Pages/Donate/Records/Cardano.elm @@ -1,7 +1,8 @@ module Config.Pages.Donate.Records.Cardano exposing (..) -import Config.Pages.Donate.Types exposing (..) import Config.Helpers.Converters exposing (formatName) +import Config.Pages.Donate.Types exposing (..) + donateCardano : Donate donateCardano = @@ -15,8 +16,7 @@ donateCardano = , donateName = name , donateFees = "0.17 ADA" , donatePreference = 6 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just False diff --git a/frontend/src/Config/Pages/Donate/Records/KoFi.elm b/frontend/src/Config/Pages/Donate/Records/KoFi.elm index 2503f20..bd58711 100755 --- a/frontend/src/Config/Pages/Donate/Records/KoFi.elm +++ b/frontend/src/Config/Pages/Donate/Records/KoFi.elm @@ -16,8 +16,7 @@ donateKoFi = , donateName = name , donateFees = "5%" , donatePreference = 5 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/LiberaPay.elm b/frontend/src/Config/Pages/Donate/Records/LiberaPay.elm index a294163..2a76ba2 100755 --- a/frontend/src/Config/Pages/Donate/Records/LiberaPay.elm +++ b/frontend/src/Config/Pages/Donate/Records/LiberaPay.elm @@ -16,8 +16,7 @@ donateLiberaPay = , donateName = name , donateFees = "0%" , donatePreference = 10 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just True , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/Merch.elm b/frontend/src/Config/Pages/Donate/Records/Merch.elm index b681f52..f30b18a 100755 --- a/frontend/src/Config/Pages/Donate/Records/Merch.elm +++ b/frontend/src/Config/Pages/Donate/Records/Merch.elm @@ -16,8 +16,7 @@ donateMerch = , donateName = name , donateFees = "~60%" , donatePreference = 1 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just False diff --git a/frontend/src/Config/Pages/Donate/Records/Patreon.elm b/frontend/src/Config/Pages/Donate/Records/Patreon.elm index 28b16bc..9521e2b 100755 --- a/frontend/src/Config/Pages/Donate/Records/Patreon.elm +++ b/frontend/src/Config/Pages/Donate/Records/Patreon.elm @@ -16,8 +16,7 @@ donatePatreon = , donateName = name , donateFees = "8%" , donatePreference = 6 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/PayPal.elm b/frontend/src/Config/Pages/Donate/Records/PayPal.elm index 63ec4f8..1d11fb7 100755 --- a/frontend/src/Config/Pages/Donate/Records/PayPal.elm +++ b/frontend/src/Config/Pages/Donate/Records/PayPal.elm @@ -16,8 +16,7 @@ donatePayPal = , donateName = name , donateFees = "1%" , donatePreference = 8 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/Stripe.elm b/frontend/src/Config/Pages/Donate/Records/Stripe.elm index d905338..c8d2b68 100755 --- a/frontend/src/Config/Pages/Donate/Records/Stripe.elm +++ b/frontend/src/Config/Pages/Donate/Records/Stripe.elm @@ -16,8 +16,7 @@ donateStripe = , donateName = name , donateFees = "3%" , donatePreference = 8 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/Template.elm b/frontend/src/Config/Pages/Donate/Records/Template.elm index 53c2e66..2719894 100755 --- a/frontend/src/Config/Pages/Donate/Records/Template.elm +++ b/frontend/src/Config/Pages/Donate/Records/Template.elm @@ -16,8 +16,7 @@ donateTemplate = , donateName = name , donateFees = "" , donatePreference = 1 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just True , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Records/YouTube.elm b/frontend/src/Config/Pages/Donate/Records/YouTube.elm index bad4504..e99400b 100755 --- a/frontend/src/Config/Pages/Donate/Records/YouTube.elm +++ b/frontend/src/Config/Pages/Donate/Records/YouTube.elm @@ -16,8 +16,7 @@ donateYouTube = , donateName = name , donateFees = "45%" , donatePreference = 3 - , hasLink = True - , hasImage = True + , isNewTabLink = True , donateFeatures = [ { free = Just False , subscriptions = Just True diff --git a/frontend/src/Config/Pages/Donate/Types.elm b/frontend/src/Config/Pages/Donate/Types.elm index dc8002d..c726910 100755 --- a/frontend/src/Config/Pages/Donate/Types.elm +++ b/frontend/src/Config/Pages/Donate/Types.elm @@ -9,8 +9,7 @@ type alias Donate = , donatePreference : Int , donatePros : List Pros , donateCons : List Cons - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , donateFeatures : List Features } diff --git a/frontend/src/Config/Pages/Interviews/Records/DrShawnBakerPodcast.elm b/frontend/src/Config/Pages/Interviews/Records/DrShawnBakerPodcast.elm index a6772da..0a13c4e 100755 --- a/frontend/src/Config/Pages/Interviews/Records/DrShawnBakerPodcast.elm +++ b/frontend/src/Config/Pages/Interviews/Records/DrShawnBakerPodcast.elm @@ -14,8 +14,7 @@ drShawnBakerPodcast = { interviewName = name , interviewImage = formatName name , interviewSocial = "https://x.com/SBakerMD" - , hasImage = True - , hasLink = False + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "He, Wants Wildlife To Not Exist So They Don’t Eat Each Other" , appearanceEpisode = "?" diff --git a/frontend/src/Config/Pages/Interviews/Records/FitAndFurious.elm b/frontend/src/Config/Pages/Interviews/Records/FitAndFurious.elm index 2f2139f..d5525d1 100755 --- a/frontend/src/Config/Pages/Interviews/Records/FitAndFurious.elm +++ b/frontend/src/Config/Pages/Interviews/Records/FitAndFurious.elm @@ -13,9 +13,8 @@ fitAndFurious = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/FitAndFuriousND" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Seed Oil Schooling!" , appearanceEpisode = "51" diff --git a/frontend/src/Config/Pages/Interviews/Records/FoolproofMastery.elm b/frontend/src/Config/Pages/Interviews/Records/FoolproofMastery.elm index 7058bb9..b21f19d 100755 --- a/frontend/src/Config/Pages/Interviews/Records/FoolproofMastery.elm +++ b/frontend/src/Config/Pages/Interviews/Records/FoolproofMastery.elm @@ -13,9 +13,8 @@ foolproofMastery = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/FoolproofMaster" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Seed Oils & Statistics" , appearanceEpisode = "14" diff --git a/frontend/src/Config/Pages/Interviews/Records/KetogeeksPodcast.elm b/frontend/src/Config/Pages/Interviews/Records/KetogeeksPodcast.elm index 3766e75..3274d27 100755 --- a/frontend/src/Config/Pages/Interviews/Records/KetogeeksPodcast.elm +++ b/frontend/src/Config/Pages/Interviews/Records/KetogeeksPodcast.elm @@ -13,9 +13,8 @@ ketoGeeksPodcast = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/fmahmad88" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "In Defense of Seed Oils and Polyunsaturated Fats" , appearanceEpisode = "78" diff --git a/frontend/src/Config/Pages/Interviews/Records/LegendaryLifePodcast.elm b/frontend/src/Config/Pages/Interviews/Records/LegendaryLifePodcast.elm index bf93551..4b53ddf 100755 --- a/frontend/src/Config/Pages/Interviews/Records/LegendaryLifePodcast.elm +++ b/frontend/src/Config/Pages/Interviews/Records/LegendaryLifePodcast.elm @@ -13,9 +13,8 @@ legendaryLifePodcast = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/ted_ryce" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Common Food And Nutrition Myths Debunked" , appearanceEpisode = "391" diff --git a/frontend/src/Config/Pages/Interviews/Records/MarkBellsPowerProject.elm b/frontend/src/Config/Pages/Interviews/Records/MarkBellsPowerProject.elm index 6d0fb1a..9f687a3 100755 --- a/frontend/src/Config/Pages/Interviews/Records/MarkBellsPowerProject.elm +++ b/frontend/src/Config/Pages/Interviews/Records/MarkBellsPowerProject.elm @@ -13,9 +13,8 @@ markBellsPowerProject = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/MarkSmellyBell" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Seed Oils Aren’t as Bad as You May Think" , appearanceEpisode = "670" diff --git a/frontend/src/Config/Pages/Interviews/Records/MuscleMemoirsPodcast.elm b/frontend/src/Config/Pages/Interviews/Records/MuscleMemoirsPodcast.elm index f33fae0..2dc2096 100755 --- a/frontend/src/Config/Pages/Interviews/Records/MuscleMemoirsPodcast.elm +++ b/frontend/src/Config/Pages/Interviews/Records/MuscleMemoirsPodcast.elm @@ -13,9 +13,8 @@ muscleMemoirsPodcast = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/MikeMurrayRD" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "The Nutri-Dex, Misconceptions, and Optimizing Body Composition" , appearanceEpisode = "11" diff --git a/frontend/src/Config/Pages/Interviews/Records/SigmaNutritionRadio.elm b/frontend/src/Config/Pages/Interviews/Records/SigmaNutritionRadio.elm index 97fdc7b..b2a698d 100755 --- a/frontend/src/Config/Pages/Interviews/Records/SigmaNutritionRadio.elm +++ b/frontend/src/Config/Pages/Interviews/Records/SigmaNutritionRadio.elm @@ -13,9 +13,8 @@ sigmaNutritionRadio = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://x.com/NutritionDanny" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Micronutrients, Anti-nutrients, and Non-essential Nutrients" , appearanceEpisode = "360" diff --git a/frontend/src/Config/Pages/Interviews/Records/StrenuousLifePodcast.elm b/frontend/src/Config/Pages/Interviews/Records/StrenuousLifePodcast.elm index 58c8e2a..cc5a66a 100755 --- a/frontend/src/Config/Pages/Interviews/Records/StrenuousLifePodcast.elm +++ b/frontend/src/Config/Pages/Interviews/Records/StrenuousLifePodcast.elm @@ -13,9 +13,8 @@ strenuousLifePodcast = in { interviewName = name , interviewImage = formatName name - , hasImage = True - , hasLink = False , interviewSocial = "https://www.threads.net/@stephan_kesting" + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "Contrarian Thinking About Nutrition" , appearanceEpisode = "244" diff --git a/frontend/src/Config/Pages/Interviews/Records/Template.elm b/frontend/src/Config/Pages/Interviews/Records/Template.elm index 3fe7c86..80903c4 100755 --- a/frontend/src/Config/Pages/Interviews/Records/Template.elm +++ b/frontend/src/Config/Pages/Interviews/Records/Template.elm @@ -14,8 +14,7 @@ template = { interviewName = name , interviewImage = formatName name , interviewSocial = "" - , hasImage = True - , hasLink = False + , isNewTabLink = True , interviewAppearances = [ { appearanceTitle = "" , appearanceEpisode = "" diff --git a/frontend/src/Config/Pages/Interviews/Types.elm b/frontend/src/Config/Pages/Interviews/Types.elm index 4a2de6c..efece17 100755 --- a/frontend/src/Config/Pages/Interviews/Types.elm +++ b/frontend/src/Config/Pages/Interviews/Types.elm @@ -5,8 +5,7 @@ type alias Interview = { interviewName : String , interviewImage : String , interviewSocial : String - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , interviewAppearances : List Appearance } diff --git a/frontend/src/Config/Pages/Products/Records/NutriDex.elm b/frontend/src/Config/Pages/Products/Records/NutriDex.elm index c882b98..5eeacc8 100755 --- a/frontend/src/Config/Pages/Products/Records/NutriDex.elm +++ b/frontend/src/Config/Pages/Products/Records/NutriDex.elm @@ -8,8 +8,8 @@ import Element.Font as F exposing (..) productNutriDex : NutriDex productNutriDex = { nutriDexTitle = "The NutriDex" - , hasImage = False - , hasLink = False + + , nutriDexFeatures = [ { feature = "The essential nutrient yields of over 700 foods are ranked and adjusted for bioavailability, nutrient absorption capacity, and metabolic conversion inefficiencies!" , featureTitle = "Nutrient Density Scoring: " diff --git a/frontend/src/Config/Pages/Products/Types.elm b/frontend/src/Config/Pages/Products/Types.elm index 0122c86..bac33c0 100755 --- a/frontend/src/Config/Pages/Products/Types.elm +++ b/frontend/src/Config/Pages/Products/Types.elm @@ -5,8 +5,6 @@ import Config.Helpers.Articles.Types exposing (References) type alias NutriDex = { nutriDexTitle : String - , hasImage : Bool - , hasLink : Bool , nutriDexFeatures : List Features , nutriDexReference : List References } diff --git a/frontend/src/Config/Pages/Services/Records/DebateAnalysis.elm b/frontend/src/Config/Pages/Services/Records/DebateAnalysis.elm index 150b820..8bc9d7b 100755 --- a/frontend/src/Config/Pages/Services/Records/DebateAnalysis.elm +++ b/frontend/src/Config/Pages/Services/Records/DebateAnalysis.elm @@ -16,9 +16,8 @@ servicesDebateAnalysis = { serviceImage = formatName name , serviceLink = Path.toString Path.Services_Analysis , serviceName = name + , isNewTabLink = False , serviceRate = "$80/hr" - , hasLink = True - , hasImage = True , serviceDescription = [ { point = "Have your own debates analyzed for constructive feedback." } , { point = "Receive advice to improve your debate and public speaking skills." } diff --git a/frontend/src/Config/Pages/Services/Records/DebateCoaching.elm b/frontend/src/Config/Pages/Services/Records/DebateCoaching.elm index fc1700d..001fa4b 100755 --- a/frontend/src/Config/Pages/Services/Records/DebateCoaching.elm +++ b/frontend/src/Config/Pages/Services/Records/DebateCoaching.elm @@ -17,8 +17,7 @@ servicesDebateCoaching = , serviceLink = Path.toString Path.Services_Coaching , serviceName = name , serviceRate = "$60/hr" - , hasLink = True - , hasImage = True + , isNewTabLink = False , serviceDescription = [ { point = "Participate in a structured course with five one-hour modules." } , { point = "Learn critical thinking, debate strategy, formal logic, and more" } diff --git a/frontend/src/Config/Pages/Services/Records/ElmBuilds.elm b/frontend/src/Config/Pages/Services/Records/ElmBuilds.elm index 8e7a7d9..9ea5b7c 100755 --- a/frontend/src/Config/Pages/Services/Records/ElmBuilds.elm +++ b/frontend/src/Config/Pages/Services/Records/ElmBuilds.elm @@ -20,8 +20,7 @@ servicesElmBuilds = , serviceLink = Path.toString Path.Services_Elm , serviceName = name , serviceRate = "$20/hr" - , hasLink = True - , hasImage = True + , isNewTabLink = False , serviceDescription = [ { point = "Receive a custom website frontend written in Elm." } , { point = "Tailored solutions based on user needs." } diff --git a/frontend/src/Config/Pages/Services/Records/NixBuilds.elm b/frontend/src/Config/Pages/Services/Records/NixBuilds.elm index 53e12db..8ecde0e 100755 --- a/frontend/src/Config/Pages/Services/Records/NixBuilds.elm +++ b/frontend/src/Config/Pages/Services/Records/NixBuilds.elm @@ -20,8 +20,7 @@ servicesNixBuilds = , serviceLink = Path.toString Path.Services_Nix , serviceName = name , serviceRate = "$40/hr" - , hasLink = True - , hasImage = True + , isNewTabLink = False , serviceDescription = [ { point = "Receive a custom NixOS configuration." } , { point = "Help with transitioning from other operating systems to NixOS." } diff --git a/frontend/src/Config/Pages/Services/Records/NutritionScience.elm b/frontend/src/Config/Pages/Services/Records/NutritionScience.elm index fff38bb..3543033 100755 --- a/frontend/src/Config/Pages/Services/Records/NutritionScience.elm +++ b/frontend/src/Config/Pages/Services/Records/NutritionScience.elm @@ -17,8 +17,7 @@ servicesNutritionScience = , serviceLink = Path.toString Path.Services_Nutrition , serviceName = name , serviceRate = "$50/hr" - , hasLink = True - , hasImage = True + , isNewTabLink = False , serviceDescription = [ { point = "Participate in a focused, one-hour Q&A session on nutrition science." } , { point = "Inquire about methodology, epistemology, and study interpretation." } diff --git a/frontend/src/Config/Pages/Services/Types.elm b/frontend/src/Config/Pages/Services/Types.elm index 1e07536..2c9e9db 100755 --- a/frontend/src/Config/Pages/Services/Types.elm +++ b/frontend/src/Config/Pages/Services/Types.elm @@ -8,14 +8,13 @@ type alias Service msg = , serviceLink : String , serviceName : String , serviceRate : String - , hasLink : Bool - , hasImage : Bool + , isNewTabLink : Bool , serviceDescription : List Description - , serviceArticle : Article msg + , serviceArticle : ServicePage msg } -type alias Article msg = +type alias ServicePage msg = { articleParagraph : Paragraph msg , articleTitles : Title , articleListEntries : ArticleList diff --git a/frontend/src/Pages/Blog.elm b/frontend/src/Pages/Blog.elm index 8fd3989..75aeb71 100755 --- a/frontend/src/Pages/Blog.elm +++ b/frontend/src/Pages/Blog.elm @@ -2,7 +2,8 @@ module Pages.Blog exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) import Config.Helpers.Articles.Article exposing (extractFirstWords) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing ( formatName @@ -14,7 +15,7 @@ import Config.Helpers.Format , paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Markdown exposing @@ -140,11 +141,15 @@ blogList device = ) <| List.concat - [ List.map (headerMaker device) [ blogHeader ] -- Pass the device to - , (case ( device.class, device.orientation ) of - _ -> - List.map (blogMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogCard article) (contentList article) + ) [ articleShenanigans , articleSweetDeception , articleEverettVegans @@ -167,17 +172,10 @@ blogHeader = "Blog" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "This page features blog articles written by me, along with contributions from guest authors, covering topics primarily related to nutrition science, health science, and article." } -blogMaker : Device -> BlogArticle -> Element msg -blogMaker device article = - cardMaker device article.articleName (contentList article) (articleImage article) article.articleLink - - contentList : BlogArticle -> List (Element msg) contentList article = [ articleMaker article ] diff --git a/frontend/src/Pages/Blog/Bigfatsurprise.elm b/frontend/src/Pages/Blog/Bigfatsurprise.elm index 81b2694..078a303 100755 --- a/frontend/src/Pages/Blog/Bigfatsurprise.elm +++ b/frontend/src/Pages/Blog/Bigfatsurprise.elm @@ -1,7 +1,9 @@ module Pages.Blog.Bigfatsurprise exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -104,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleBigFatSurprise ] ] diff --git a/frontend/src/Pages/Blog/Everettvegans.elm b/frontend/src/Pages/Blog/Everettvegans.elm index 7221c5c..b3d3ad1 100755 --- a/frontend/src/Pages/Blog/Everettvegans.elm +++ b/frontend/src/Pages/Blog/Everettvegans.elm @@ -1,7 +1,9 @@ module Pages.Blog.Everettvegans exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -104,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleEverettVegans ] ] diff --git a/frontend/src/Pages/Blog/Huntergatherers.elm b/frontend/src/Pages/Blog/Huntergatherers.elm index d79e6bd..02eb96d 100755 --- a/frontend/src/Pages/Blog/Huntergatherers.elm +++ b/frontend/src/Pages/Blog/Huntergatherers.elm @@ -1,8 +1,9 @@ module Pages.Blog.Huntergatherers exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) - +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -105,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleHunterGatherers ] ] diff --git a/frontend/src/Pages/Blog/Meatapologetics.elm b/frontend/src/Pages/Blog/Meatapologetics.elm index 278cfc2..b1b1a1c 100755 --- a/frontend/src/Pages/Blog/Meatapologetics.elm +++ b/frontend/src/Pages/Blog/Meatapologetics.elm @@ -1,8 +1,9 @@ module Pages.Blog.Meatapologetics exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -105,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleMeatApologetics ] ] diff --git a/frontend/src/Pages/Blog/Nagragoodrich.elm b/frontend/src/Pages/Blog/Nagragoodrich.elm index 3279f05..3a9de9b 100755 --- a/frontend/src/Pages/Blog/Nagragoodrich.elm +++ b/frontend/src/Pages/Blog/Nagragoodrich.elm @@ -1,8 +1,9 @@ module Pages.Blog.Nagragoodrich exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -105,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleNagraGoodrich ] ] diff --git a/frontend/src/Pages/Blog/Plantbasedmeta.elm b/frontend/src/Pages/Blog/Plantbasedmeta.elm index 88f4484..a16e51c 100755 --- a/frontend/src/Pages/Blog/Plantbasedmeta.elm +++ b/frontend/src/Pages/Blog/Plantbasedmeta.elm @@ -1,8 +1,9 @@ module Pages.Blog.Plantbasedmeta exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -105,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articlePlantBasedMeta ] ] diff --git a/frontend/src/Pages/Blog/Quacksmashing.elm b/frontend/src/Pages/Blog/Quacksmashing.elm index 454c24c..0c85c9f 100755 --- a/frontend/src/Pages/Blog/Quacksmashing.elm +++ b/frontend/src/Pages/Blog/Quacksmashing.elm @@ -1,9 +1,9 @@ module Pages.Blog.Quacksmashing exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) - -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -106,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleQuackSmashing ] ] diff --git a/frontend/src/Pages/Blog/Sapiendiet.elm b/frontend/src/Pages/Blog/Sapiendiet.elm index 1163778..b483d27 100755 --- a/frontend/src/Pages/Blog/Sapiendiet.elm +++ b/frontend/src/Pages/Blog/Sapiendiet.elm @@ -1,9 +1,9 @@ module Pages.Blog.Sapiendiet exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) - -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -106,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleSapienDiet ] ] diff --git a/frontend/src/Pages/Blog/Seedoils.elm b/frontend/src/Pages/Blog/Seedoils.elm index fd48a5e..6bc769e 100755 --- a/frontend/src/Pages/Blog/Seedoils.elm +++ b/frontend/src/Pages/Blog/Seedoils.elm @@ -1,9 +1,9 @@ module Pages.Blog.Seedoils exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) - -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -106,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleSeedOils ] ] diff --git a/frontend/src/Pages/Blog/Shenanigans.elm b/frontend/src/Pages/Blog/Shenanigans.elm index 27d6423..b24d414 100755 --- a/frontend/src/Pages/Blog/Shenanigans.elm +++ b/frontend/src/Pages/Blog/Shenanigans.elm @@ -1,9 +1,9 @@ module Pages.Blog.Shenanigans exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) - -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -106,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleShenanigans ] ] diff --git a/frontend/src/Pages/Blog/Sweetdeception.elm b/frontend/src/Pages/Blog/Sweetdeception.elm index c589f7c..2fa662b 100755 --- a/frontend/src/Pages/Blog/Sweetdeception.elm +++ b/frontend/src/Pages/Blog/Sweetdeception.elm @@ -1,8 +1,9 @@ module Pages.Blog.Sweetdeception exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.Articles.Article exposing (articleMaker) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Articles.Article exposing (contentList) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -105,9 +106,14 @@ articleList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (articleMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\article -> + cardMaker device (C.BlogArticle article) (contentList article) + ) [ articleSweetDeception ] ] diff --git a/frontend/src/Pages/Contact.elm b/frontend/src/Pages/Contact.elm index a832f2e..5dd017b 100755 --- a/frontend/src/Pages/Contact.elm +++ b/frontend/src/Pages/Contact.elm @@ -1,9 +1,10 @@ module Pages.Contact exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -123,19 +124,19 @@ contactList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (contactMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\contact -> + cardMaker device (C.Contact contact) (contentList contact) + ) [] ] -contactMaker : Device -> Contact -> Element msg -contactMaker device contact = - cardMaker device contact.contactName (contentList contact) { description = "", src = "" } contact.contactLink - - contentList : Contact -> List (Element msg) contentList contact = [ instructionBody ] diff --git a/frontend/src/Pages/Debate.elm b/frontend/src/Pages/Debate.elm index ccf3304..7ec9c4e 100755 --- a/frontend/src/Pages/Debate.elm +++ b/frontend/src/Pages/Debate.elm @@ -11,7 +11,8 @@ import Config.Data.Identity exposing ( pageNames ) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing (formatName) import Config.Helpers.Format exposing @@ -19,7 +20,7 @@ import Config.Helpers.Format , paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -141,12 +142,15 @@ debateList device = ) <| List.concat - [ List.map (headerMaker device) - [ debateHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (debateMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\debate -> + cardMaker device (C.Debate debate) (contentList debate) + ) [ debateArguments , debateCuckList , debateGibberish @@ -161,17 +165,10 @@ debateHeader = "Debate" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "Here you will find links to various pages relevant to debate, such as formal arguments, a list of debate-dodging cucks, and an inventory of nonsensical terminology." } -debateMaker : Device -> Debate -> Element msg -debateMaker device debate = - cardMaker device debate.debateTitle (contentList debate) (debateImage debate) debate.debateLink - - contentList : Debate -> List (Element msg) contentList debate = [ descriptionMaker debate ] @@ -240,8 +237,6 @@ debateArguments = , debateLink = Path.toString Path.Debate_Arguments , debateCount = List.length argumentList , debateImage = formatName name - , hasLink = True - , hasImage = True , isNewTabLink = False , debateDescription = "This page features arguments that I hold to be sound, though with varying degrees of confidence. I'm open to hearing all challenges, as I am ready to engage with any substantive critiques and defend any argument listed. I have additionally included a confidence meter with each argument to give readers a clearer understanding of how strongly I hold to the argument." } @@ -257,8 +252,6 @@ debateCuckList = , debateLink = Path.toString Path.Debate_Cucklist , debateCount = List.length cuckList , debateImage = formatName name - , hasLink = True - , hasImage = True , isNewTabLink = False , debateDescription = "This page features a list of complete fucking morons who wrote cheques with their mouths that their asses ultimately couldn't cash. Each person included in this list has dodged debating me in some way, shape, or form. Whether it's simply ignoring invitations, or outright refusing to engage, or agreeing to debate and then subsequently withdrawing. All such instances are catalogued here." } @@ -274,8 +267,6 @@ debateGibberish = , debateLink = Path.toString Path.Debate_Gibberish , debateCount = List.length gibberishList , debateImage = formatName name - , hasLink = True - , hasImage = True , isNewTabLink = False , debateDescription = "This page is specifically for terms and ostensible concepts that I don't have a good reason to believe are understandable from at least one viewpoint. If the clarification of a philosophical term is unsatisfying or unsuccessful, and my interlocutor has exhausted all means of rendering the concept to me, the term ends up here until someone explains to me what the fuck it even means." } diff --git a/frontend/src/Pages/Debate/Arguments.elm b/frontend/src/Pages/Debate/Arguments.elm index abca6b6..4c14f3f 100755 --- a/frontend/src/Pages/Debate/Arguments.elm +++ b/frontend/src/Pages/Debate/Arguments.elm @@ -1,14 +1,15 @@ module Pages.Debate.Arguments exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing (toTitleCase) import Config.Helpers.Format exposing ( paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -136,12 +137,15 @@ debateList device = ) <| List.concat - [ List.map (headerMaker device) - [ argumentHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (argumentMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\argument -> + cardMaker device (C.Argument argument) (contentList argument) + ) argumentList ] @@ -153,17 +157,10 @@ argumentHeader = "Arguments" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "This page features arguments that I hold to be sound. I'm open to hearing all challenges, as I am ready to engage with and defend any argument listed." } -argumentMaker : Device -> Argument -> Element msg -argumentMaker device argument = - cardMaker device argument.argumentTitle (contentList argument) (argumentImage argument) argument.proofLink - - contentList : Argument -> List (Element msg) contentList argument = [ summaryMakerDesktop argument diff --git a/frontend/src/Pages/Debate/Cucklist.elm b/frontend/src/Pages/Debate/Cucklist.elm index e2f8894..8ab2901 100755 --- a/frontend/src/Pages/Debate/Cucklist.elm +++ b/frontend/src/Pages/Debate/Cucklist.elm @@ -1,7 +1,8 @@ module Pages.Debate.Cucklist exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing (formatSocial) import Config.Helpers.Format exposing @@ -9,7 +10,7 @@ import Config.Helpers.Format , paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -129,12 +130,15 @@ cucksList device = ) <| List.concat - [ List.map (headerMaker device) - [ cuckListHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (cuckMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\cuck -> + cardMaker device (C.Cuck cuck) (contentList cuck) + ) cuckList ] @@ -146,17 +150,10 @@ cuckListHeader = "Cucklist" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "This page features a list of morons who wrote cheques with their mouths that their asses couldn't cash. Each person included in this list has dodged debating me." } -cuckMaker : Device -> Cuck -> Element msg -cuckMaker device cuck = - cardMaker device cuck.cuckName (contentList cuck) (cuckImage cuck) cuck.cuckSocial - - contentList : Cuck -> List (Element msg) contentList cuck = [ socialMaker cuck diff --git a/frontend/src/Pages/Debate/Gibberish.elm b/frontend/src/Pages/Debate/Gibberish.elm index a15eaac..4397a8e 100755 --- a/frontend/src/Pages/Debate/Gibberish.elm +++ b/frontend/src/Pages/Debate/Gibberish.elm @@ -1,14 +1,15 @@ module Pages.Debate.Gibberish exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing (toTitleCase) import Config.Helpers.Format exposing ( paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -134,12 +135,15 @@ gibberishList device = ) <| List.concat - [ List.map (headerMaker device) - [ gibberishHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (gibberishMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\gibberish -> + cardMaker device (C.Gibberish gibberish) (contentList gibberish) + ) [ epistemologyGibberish , theologyGibberish , metaphysicsGibberish @@ -158,17 +162,10 @@ gibberishHeader = "Gibberish" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "This page is specifically for terms and ostensible concepts that I think are either nonsensical or so practically useless that its intelligiblity is irrelevant." } -gibberishMaker : Device -> Gibberish -> Element msg -gibberishMaker device gibberish = - cardMaker device gibberish.gibberishTitle (contentList gibberish) (gibberishImage gibberish) gibberish.gibberishLink - - contentList : Gibberish -> List (Element msg) contentList gibberish = [ descriptionMaker gibberish diff --git a/frontend/src/Pages/Donate.elm b/frontend/src/Pages/Donate.elm index de900f0..d91b74d 100755 --- a/frontend/src/Pages/Donate.elm +++ b/frontend/src/Pages/Donate.elm @@ -1,14 +1,15 @@ module Pages.Donate exposing (Model, Msg, page) import Config.Data.Identity as I exposing (..) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing ( headerFontSizeSmall , paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -131,12 +132,15 @@ donateList device = ) <| List.concat - [ List.map (headerMaker device) - [ donateHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (\donate -> donateMaker device donate) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\donate -> + cardMaker device (C.Donate donate) (contentList device donate) + ) [ donateLiberaPay , donateStripe , donatePatreon @@ -155,17 +159,10 @@ donateHeader = "Donate" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "My site, research, and content all cost time and money to run. If you find my contributions valuable, please consider supporting my work on any of the platforms listed below!" } -donateMaker : Device -> Donate -> Element msg -donateMaker device donate = - cardMaker device donate.donateName (contentList device donate) (donateImage donate) donate.donateLink - - contentList : Device -> Donate -> List (Element msg) contentList device donate = [ feeMaker donate diff --git a/frontend/src/Pages/Home_.elm b/frontend/src/Pages/Home_.elm index abd2196..15d355c 100755 --- a/frontend/src/Pages/Home_.elm +++ b/frontend/src/Pages/Home_.elm @@ -6,7 +6,7 @@ import Config.Helpers.Format ( paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing diff --git a/frontend/src/Pages/Interviews.elm b/frontend/src/Pages/Interviews.elm index bc8c07b..68f5f8d 100755 --- a/frontend/src/Pages/Interviews.elm +++ b/frontend/src/Pages/Interviews.elm @@ -1,7 +1,8 @@ module Pages.Interviews exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Converters exposing (formatSocial) import Config.Helpers.Format exposing @@ -138,12 +139,15 @@ interviewList device = ) <| List.concat - [ List.map (headerMaker device) - [ interviewHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (interviewMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\interview -> + cardMaker device (C.Interview interview) (contentList interview) + ) [ sigmaNutritionRadio , markBellsPowerProject , foolproofMastery @@ -164,17 +168,10 @@ interviewHeader = "Interviews" in { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False , headerBody = "This page showcases various podcasts and shows I've been on. If you’d like to have me as a guest on your podcast, feel free to reach out—I’d love to share my perspectives with your audience!" } -interviewMaker : Device -> Interview -> Element msg -interviewMaker device interview = - cardMaker device interview.interviewName (contentList interview) (interviewImage interview) interview.interviewSocial - - contentList : Interview -> List (Element msg) contentList interview = [ appearanceTitle interview diff --git a/frontend/src/Pages/NotFound_.elm b/frontend/src/Pages/NotFound_.elm index 994e12a..b95e5fb 100755 --- a/frontend/src/Pages/NotFound_.elm +++ b/frontend/src/Pages/NotFound_.elm @@ -1,8 +1,9 @@ module Pages.NotFound_ exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing diff --git a/frontend/src/Pages/Nutridex.elm b/frontend/src/Pages/Nutridex.elm index 89d3cd7..ab55c9b 100755 --- a/frontend/src/Pages/Nutridex.elm +++ b/frontend/src/Pages/Nutridex.elm @@ -3,7 +3,8 @@ module Pages.Nutridex exposing (Model, Msg, page) import Config.Data.Identity exposing (pageNames) import Config.Helpers.Articles.Article exposing (makeReference) import Config.Helpers.Articles.Types exposing (References) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing ( divider @@ -135,19 +136,19 @@ nutriDexList device = ) <| List.concat - [ (case ( device.class, device.orientation ) of - _ -> - List.map (\nutridex -> nutriDexMaker device nutridex) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\nutriDex -> + cardMaker device (C.NutriDex nutriDex) (contentList device nutriDex) + ) [ productNutriDex ] ] -nutriDexMaker : Device -> NutriDex -> Element msg -nutriDexMaker device nutridex = - cardMaker device nutridex.nutriDexTitle (contentList device nutridex) { description = "", src = "" } "" - - contentList : Device -> NutriDex -> List (Element msg) contentList device nutridex = [ featureList nutridex device diff --git a/frontend/src/Pages/Services.elm b/frontend/src/Pages/Services.elm index 8dd6e61..aa28521 100755 --- a/frontend/src/Pages/Services.elm +++ b/frontend/src/Pages/Services.elm @@ -2,7 +2,8 @@ module Pages.Services exposing (Model, Msg, page) import Browser import Config.Data.Identity exposing (pageNames) -import Config.Helpers.CardFormat exposing (cardMaker) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing ( headerFontSizeMedium @@ -10,7 +11,7 @@ import Config.Helpers.Format , paragraphFontSize , paragraphSpacing ) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -124,12 +125,15 @@ servicesList device = ) <| List.concat - [ List.map (headerMaker device) - [ servicesHeader ] - , (case ( device.class, device.orientation ) of - _ -> - List.map (serviceMaker device) - ) + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) (contentList service) + ) [ servicesDebateAnalysis , servicesDebateCoaching , servicesNutritionScience @@ -139,24 +143,6 @@ servicesList device = ] -servicesHeader : Header -servicesHeader = - let - name = - "Services" - in - { headerTitle = String.toUpper name - , hasImage = False - , hasLink = False - , headerBody = "Bundle any of the services below to receive a $10 discount per hour. For example, two Debate Analysis sessions would cost $140 total, instead of $80/hr. All prices are in CAD." - } - - -serviceMaker : Device -> Service msg -> Element msg -serviceMaker device service = - cardMaker device service.serviceName (contentList service) (serviceImage service) service.serviceLink - - contentList : Service msg -> List (Element msg) contentList service = [ rateMaker service diff --git a/frontend/src/Pages/Services/Analysis.elm b/frontend/src/Pages/Services/Analysis.elm index 60ec4e8..e2ff4a9 100755 --- a/frontend/src/Pages/Services/Analysis.elm +++ b/frontend/src/Pages/Services/Analysis.elm @@ -1,6 +1,7 @@ module Pages.Services.Analysis exposing (Model, Msg, page) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing (pageList, topLevelContainer) @@ -105,17 +106,24 @@ analysisContainer device = analysisList : Device -> Element msg analysisList device = - column pageList <| + column + (case ( device.class, device.orientation ) of + _ -> + pageList + ) + <| List.concat - (case ( device.class, device.orientation ) of - _ -> - [ [ headerMaker device ] ] - ) - - -headerMaker : Device -> Element msg -headerMaker device = - cardMaker device "" contentList { description = "", src = "" } "" + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) contentList + ) + [] + ] contentList : List (Element msg) diff --git a/frontend/src/Pages/Services/Coaching.elm b/frontend/src/Pages/Services/Coaching.elm index ab00c3a..dde0755 100755 --- a/frontend/src/Pages/Services/Coaching.elm +++ b/frontend/src/Pages/Services/Coaching.elm @@ -1,8 +1,9 @@ module Pages.Services.Coaching exposing (Model, Msg, page) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -110,17 +111,24 @@ coachingContainer device = coachingList : Device -> Element msg coachingList device = - column pageList <| + column + (case ( device.class, device.orientation ) of + _ -> + pageList + ) + <| List.concat - (case ( device.class, device.orientation ) of - _ -> - [ [ headerMaker device ] ] - ) - - -headerMaker : Device -> Element msg -headerMaker device = - cardMaker device "" contentList { description = "", src = "" } "" + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) contentList + ) + [] + ] contentList : List (Element msg) diff --git a/frontend/src/Pages/Services/Elm.elm b/frontend/src/Pages/Services/Elm.elm index 03b51df..8fb3029 100755 --- a/frontend/src/Pages/Services/Elm.elm +++ b/frontend/src/Pages/Services/Elm.elm @@ -1,8 +1,9 @@ module Pages.Services.Elm exposing (Model, Msg, page) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -110,17 +111,24 @@ elmBuildsContainer device = elmBuildsList : Device -> Element msg elmBuildsList device = - column pageList <| + column + (case ( device.class, device.orientation ) of + _ -> + pageList + ) + <| List.concat - (case ( device.class, device.orientation ) of - _ -> - [ [ headerMaker device ] ] - ) - - -headerMaker : Device -> Element msg -headerMaker device = - cardMaker device "" contentList { description = "", src = "" } "" + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) contentList + ) + [] + ] contentList : List (Element msg) diff --git a/frontend/src/Pages/Services/Nix.elm b/frontend/src/Pages/Services/Nix.elm index 67d6b39..ef34c75 100755 --- a/frontend/src/Pages/Services/Nix.elm +++ b/frontend/src/Pages/Services/Nix.elm @@ -1,8 +1,9 @@ module Pages.Services.Nix exposing (Model, Msg, page) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -110,17 +111,24 @@ elmBuildsContainer device = elmBuildsList : Device -> Element msg elmBuildsList device = - column pageList <| + column + (case ( device.class, device.orientation ) of + _ -> + pageList + ) + <| List.concat - (case ( device.class, device.orientation ) of - _ -> - [ [ headerMaker device ] ] - ) - - -headerMaker : Device -> Element msg -headerMaker device = - cardMaker device "" contentList { description = "", src = "" } "" + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) contentList + ) + [] + ] contentList : List (Element msg) diff --git a/frontend/src/Pages/Services/Nutrition.elm b/frontend/src/Pages/Services/Nutrition.elm index a9c6941..d85df7e 100755 --- a/frontend/src/Pages/Services/Nutrition.elm +++ b/frontend/src/Pages/Services/Nutrition.elm @@ -1,8 +1,9 @@ module Pages.Services.Nutrition exposing (Model, Msg, page) -import Config.Helpers.CardFormat exposing (..) +import Config.Helpers.Cardables.Helpers exposing (cardMaker) +import Config.Helpers.Cardables.Types as C import Config.Helpers.Format exposing (..) -import Config.Helpers.Headers.Header exposing (headerMaker) +import Config.Helpers.Headers.Header exposing (..) import Config.Helpers.Headers.Types exposing (Header) import Config.Helpers.Response exposing @@ -110,17 +111,24 @@ nutritionContainer device = nutritionList : Device -> Element msg nutritionList device = - column pageList <| + column + (case ( device.class, device.orientation ) of + _ -> + pageList + ) + <| List.concat - (case ( device.class, device.orientation ) of - _ -> - [ [ headerMaker device ] ] - ) - - -headerMaker : Device -> Element msg -headerMaker device = - cardMaker device "" contentList { description = "", src = "" } "" + [ -- List.map (headerMaker device) + -- [ + -- servicesHeader + -- ] + -- , + List.map + (\service -> + cardMaker device (C.Service service) contentList + ) + [] + ] contentList : List (Element msg)