feat: very close to v1

This commit is contained in:
Nick 2024-12-22 19:42:23 -06:00
parent a9fb4fb14b
commit cf580a71d0
38 changed files with 428 additions and 246 deletions

View file

@ -102,16 +102,11 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat
[ -- List.map (headerMaker device)
-- [
-- servicesHeader
-- ]
-- ,
List.map
[ List.map
(\article ->
cardMaker device (C.BlogArticle article) (contentList article)
)

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat
@ -117,3 +117,7 @@ articleList device =
)
[ articleShenanigans ]
]

View file

@ -102,7 +102,7 @@ articleList device =
column
(case ( device.class, device.orientation ) of
_ ->
pageList
pageList device
)
<|
List.concat