feat: v1 finally done?

This commit is contained in:
Nick 2025-01-02 02:33:57 -06:00
parent 9f8d9c3146
commit 07b9330264
245 changed files with 3140 additions and 2197 deletions

View file

@ -3,7 +3,7 @@ module Pages.Blog.Bigfatsurprise exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.BigFatSurprise exposing (articleBigFatSurprise)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Everettvegans exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.EverettVegans exposing (articleEverettVegans)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)
@ -53,6 +58,8 @@ init () =
(Effect.sendCmd resetViewport)
)
-- UPDATE
@ -104,12 +111,7 @@ articleList device =
)
<|
List.concat
[ -- List.map (headerMaker device)
-- [
-- servicesHeader
-- ]
-- ,
List.map
[ List.map
(\article ->
cardMaker device (C.BlogArticle article) (contentList article [])
)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Huntergatherers exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.HunterGatherers exposing (articleHunterGatherers)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)
@ -54,6 +59,7 @@ init () =
)
-- UPDATE
@ -105,12 +111,7 @@ articleList device =
)
<|
List.concat
[ -- List.map (headerMaker device)
-- [
-- servicesHeader
-- ]
-- ,
List.map
[ List.map
(\article ->
cardMaker device (C.BlogArticle article) (contentList article [])
)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Meatapologetics exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.MeatApologetics exposing (articleMeatApologetics)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Nagragoodrich exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.NagraGoodrich exposing (articleNagraGoodrich)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)
@ -54,6 +59,7 @@ init () =
)
-- UPDATE

View file

@ -3,7 +3,7 @@ module Pages.Blog.Plantbasedmeta exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.PlantBasedMeta exposing (articlePlantBasedMeta)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Quacksmashing exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.QuackSmashing exposing (articleQuackSmashing)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Sapiendiet exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.SapienDiet exposing (articleSapienDiet)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Seedoils exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.SeedOils exposing (articleSeedOils)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)

View file

@ -3,7 +3,7 @@ module Pages.Blog.Shenanigans exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.Shenangians exposing (articleShenanigans)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)
@ -117,7 +122,3 @@ articleList device =
)
[ articleShenanigans ]
]

View file

@ -3,7 +3,7 @@ module Pages.Blog.Sweetdeception exposing (Model, Msg, page)
import Config.Data.Identity exposing (pageNames)
import Config.Helpers.Articles.Article exposing (contentList)
import Config.Helpers.Cards.Outer.Helpers exposing (cardMaker)
import Config.Helpers.Cards.Outer.Types as C
import Config.Helpers.Cards.Outer.Types as C exposing (Cardable(..))
import Config.Helpers.Headers.Types exposing (Header)
import Config.Helpers.Response
exposing
@ -13,11 +13,16 @@ import Config.Helpers.Response
import Config.Helpers.Viewport exposing (resetViewport)
import Config.Pages.Blog.Records.SweetDeception exposing (articleSweetDeception)
import Effect exposing (Effect)
import Element as E exposing (..)
import Element as E
exposing
( Device
, Element
, column
)
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared exposing (..)
import Shared exposing (Model)
import View exposing (View)