My personal website, in gleam+lustre!
Is a route too.
+8
-2
+1
.gitignore
+1
.gitignore
+7
-2
src/homepage.gleam
+7
-2
src/homepage.gleam
···
69
69
#("/me/links", Links, "Links", Date(2026, March, 16)),
70
70
]
71
71
72
-
fn sitemap() -> List(#(String, Route, String, Date)) {
72
+
fn sitemap() -> List(#(String, Route, String, calendar.Date)) {
73
73
let posts =
74
74
posts()
75
75
|> list.map(fn(post) {
···
90
90
pages |> list.append(posts)
91
91
}
92
92
93
-
fn view_sitemap() -> Element(Msg) {
93
+
fn view_sitemap() -> List(Element(Msg)) {
94
94
let all = sitemap()
95
95
todo
96
96
}
···
398
398
Portfolio
399
399
NotFound(uri: Uri)
400
400
AllAndEverything
401
+
Sitemap
401
402
Category(String)
402
403
Tagged(String)
403
404
Links
···
526
527
527
528
["startpage"] -> PersonalStartPage
528
529
530
+
["sitemap"] | ["sitemap.html"] -> Sitemap
531
+
529
532
["everything"] -> AllAndEverything
530
533
531
534
_ -> NotFound(uri:)
···
559
562
NotFound(_) -> "/404"
560
563
Tagged(v) -> "/posts/tagged/" <> v
561
564
Category(c) -> "/posts/category/" <> c
565
+
Sitemap -> "/sitemap.html"
562
566
}
563
567
564
568
attribute.href(url)
···
683
687
Portfolio ->
684
688
view_portfolio()
685
689
|> into_altered_main(string.replace(_, "max-w-2xl", "max-w-6xl"))
690
+
Sitemap -> view_sitemap() |> into_main_with_badges
686
691
NotFound(_) -> view_not_found() |> into_main_with_badges
687
692
AllAndEverything -> view_all_and_everything(model) |> into_main
688
693
PersonalStartPage -> view_personal_start_page() |> into_main_with_badges